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Reflexeink vannak. Ret lexeink. 
amelyek meghatarozzak a dol- 
gokra val6 also reakci6inkat. 
Reflexeik vannak az ujsagirbknak 
is, s ezekre a reflexekre hallga- 
va hallgatunk tobb tucat kolle- 
g£mmal egyutt peldaul arrol, 
amirol mar h6napok 6ta szerte 
az crszagban beszelnek es tud- 
nak, hogy ugy nez ki, Commodora 
16-os gepek lesznek, ha nem is 
szeptembertol, de osztol az alta- 
lanos iskolakban. Hallgatunk, 
mert bar senkinek sem tettunk 
husegeskut, de azt mondtak 
nekunk amugy baratilag, hogy ez 
meg nem publikus, meg meg 
nines meg a felsobb dontes 
S bar az ilyen barati kereseket 
minden valamire valo sajtoban 
figyelmen kivul hagyjak eppen 
felsobb szempontra - tudniillik 
a tajekoztatas szent kotelesse- 
gere hivatkozva de mert ref- 
lexeink vannak, hat hallgatunk. 
Pedig talan a kozvelemenyt is 
erdemes lenne nemcsak tajekoz- 
tatni, de akar meg is kerdezni, 

hogy mi a velemenye a lehetosegek ismereteben. Marpedig 
ugy tunik, a lehetdseg ezuttal egy igazan magyargep.a Primo 
es ez az ordongos BASIC-kel rendelkezd Commodore. 
A nyari, kicsiket hosszabb szerkesztesi 6s nyomdai atfutasi 
ido kovetkezmenye. hogy lehetseges, mire olvasoink kezebe 
kerulnek e sorok, mar tele voltak a lapok ezzel a hirrel. mert 
vegre dontes szuletett, alairtak a szerzodest, vagy akar mar 
a gepek is uton vannak Budapestre. Most, amikor e sorok 
irddnak meg ugy tudjuk, nines dontes, nines szerzodes. de 
er6sodik a lehetflseg, hogy a parharcbbl a C-16 hfvei kerulnek 
ki gyoztesen. 

No es mit mondanak minderrol a reflexek? Mit mondattak 
a dologban igy-ugy erintettek az elmult hbnapokban? 
Reflexekkel kezdtem, azzal illenek hat folytatni. De, hogy 
ebben az ugyben mennyire megcsaltak bennunket a reflexek, 
arra csak egy pelda. Kollegam, aki annak idejen melysegesen 
egyetertett azzal a nezettel, hogy a HT helyett ugyanabbbl 
a dollarosszegbol, amibe a gep alkatr^szei kerultek, sokkal 
erdemesebb lett volna Spectrumokat vagy C-64-eseket oszto- 
gatni a kozepiskolaknak, nos ugyanez a kollegam most melyse- 
gesen nem ert egyet a C-16 hivekkel. A hazai ipar vedelmet 
emlegeti - ez is egyfajta reflex -, meg az alkatreszellatast. 
meg a kesobbi ujabb gepkontingenst. hogy tudniillik ha most 
van is. lesz-e legkozelebb is elegendo dollarunk. hogy ujabb 




1985 AUGUSZTUS 




gepeket vegyunk. No 6s persze a 
legfobb reflex is elokerul ; minek 
veszunk valamit kemeny valu- 
taert, ha megkaphat6 forintert is. 
Kollegam ervelesevel voltakep- 
pen roviden osszegezhettem is 
azokat a nezeteket, amelyek 
a Primo mellett tettek le voksu- 
kat. No es mit mond az ellen- 
t^bor? 

Egyreszt - s ez a legfontosabb - 
a ket gep kozti szinvonalkulonb- 
segre hivatkozik, amely tagad- 
hatatlanul a szines, nagyfelbon- 
tasu grafikat B ASIC-ben is tudo, 
sot sajat BASIC rajzolb utasitas- 
keszlettel is rendelkezd C-16 
mellett szol. Emlegetik a ket ceg 
kozott meglevo rutinkulonbseget 
is, amely mikroelektronikardl 
leven sz6 nem elhanyagolhato 
tenyezo - s meg is szokott nyil- 
vanulni a gyartott termek 
megbizhat6sdg£ban. Azutan arrbl 
sem szoktak elfelejtkezni a C-16 
hivei. hogy a HT-nel mar egyszer 
sikerult meggydzni a meggy6zen- 
ddket, hogy ez forintert van, 
azutan kiderult. hogy annyi dollar volt abban a forintban, 
mint egen a csillag. Hmm, hat ebben is van valami. 
A ket tabor reflexszerQ velemenyeiben mindket oldalon sok 
igazsag van. Azt gondoljuk azonban - vagy ha ugy tetszik, 
szerkesztosegunk azon az allasponton van hogy a reflexek 
helyett ezuttal egyszer vegre a jozan esznek kellene diadal- 
maskodni. Marpedig a j6zan esz azt diktalja, hogy ha egy 
szemernyi lehetoseg is van arra, hogy C-16-os gepek kerulje- 
nek az altalanos iskolakba, akkor ezt a szemernyi lehetoseget 
meg kell ragadni 

Ugy rem6ljiik, hogy mire olvassak ezt az irast, a kerdes mar 
nem kerdes. Ugy latjuk, hogy egyre tobb olyan dontes szuletik 
a szamitastechnikaban is, az oktatasban is, meg a szamitas- 
technika oktatasban is, amely nem reflexszeruen dol el. S ugy 
remeljuk, hogy ha netan e lap megjelenese idopontjaban m6g- 
sines dontes. akkor az a teny, hogy az ujsagirb felretette 
a reflexeit es megirta azt amit kertek, hogy ne irjon meg. 
nem art a dontesnek. Mert ha igen. az is csak egy rossz refle- 
xunket igazoln£ I 
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^ Hlroldal - 7 . amelybol megtudhatjak. hogy mit tud a Sprite' 
© Majdnem mandk - ezen az oldalon meg azt tudhatjak meg. hogy hogy tud spnte-szerusegeket a VC 20' 

© Majdnem mandk a valtozatossag kedveert egy oldallal kes6bb megtudhatjak. hogy hogyan tud spnte-szerusegeket a HT 1080ZI 
© VC 20 prolongtlva - benne a multkon szamban elinditott gepi k6d sorozat masodik resze. egy hatalmas. inyenceknek is 
aianlhatb tablazattal 

© Spectrum Pascal - bemutatja egy szakember a HP4T nevu Pascal-forditot - gyakorlati tapasztalatokkal fuszerezve 

© Kinpadon a hetedhtt C-16 - egy konyv. amelyr<5l vegre egyertelmuen ]6kat irhatunk ' Egy konyv. amelynek kntikusa verz6 szivvel 

allapitja meg. hogy sainos nem 6 frta' 
© Sorvezetd lebeg6pontos aritmetika a Spectrumon - immaron otodik alkalommal' 
© Posta - egy kapcsolassal. amely aramkimaradas eseten is meg6rzi a programot 

<D Primo nyerd - a harmad.k feladattal. a masod.k feladat megoldasavai Raadaskent .tt a M.color nyer6 palyazat vegeredmenye ' 
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A Videoton mikroszamitogep-csaladjanak 
legkisebb tagja a tv-computer Ennek gvar- 
tasat ez 6v masodik feleben kezdik. A mar 
professzionalis celokra alkalmas VT-16-ot 
tavaly kezdtek gyartam es az iden 800 keszuf 
bel6ie. A csalad legnagyobb tagja. a VT-32 
a rnoszkvai magyar jubileumi kiailitas egyik 
erdekessege es uidonsaga volt 



Felmer6sek szermt a mult eVben mar mmtegy 
26 milliard dollarnak megfelelo' ertekben 6rt6- 
kesitettek szemelyi szamft6gepeket. Tovabbi 
elGrehaladasra lehet szamftani. Elfirejelzesek 
alapjan megallapithat6. hogy evi 25 szazale 
kos piaci novekedes varhat6. 
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Az NDK f<5varosanak ujdonsaga a kozeJmult- 
ban uzembe belyezett k6t takarekpenztan 
k6szp6nzautomata. A szamit6g6ppel ossze- 
kapcsolt. magneskartyaval mukod6 automa 
tak ejjel- nappal kiszolgaljak az ugyfeleket. 
A Sparkasse tervei szermt hamarosan ujabb 
berendezeseket helyeznek uzembe Berlinben 
es az NDK tobb nagyvarosaban. 



Mikroszamitbgepes taxametereket szereltek 
be husz drezdai taxiba A korszeru fcerendezes 
jelzi a fuvardijat. kuionvalasztva a varakozasi 
id6t es a csomagdijat. valammt fehegyzi 
a muszakonkenti fuvarok alapadatait Az uj 
keszuleket az erfurti 'adiotechnikai gyar es 
a drezdai taxivalialat kozosen fejlesztette ki 





A szami't6gep korszak letrehozta sejat buno- 
z6tfpusat. az okos. mtellektuahs szamitog^p- 
bunozflt Az ujfajta bunozes ijeszto gyorsa 
saggal terjed Egy amenkai felmeres szermt 
a megkerdezett nagy cegek kozel otven 
szazalekanal tapasztaltak tavaly valamilyen 
merteku szamitogepes buntettet. ami altala- 
ban bizonyos penzosszegek sajat c^lra tor- 
ten6 atutaltatasabol allt. Az ismertte valt 
bunugyek okozta kar korulbelul fel milliard 
dollarra rug A fel nem deritet eseteket is bele- 
ertve az osszeget mmtegy harommilliard 
dollarra becsulik. 




Szamottev<5 kulonbsegek vannak az elektroni- 
zaao teren a kozel azonos fejlettsegu nagy 
nyugat-europai orszagok kozott is Az NSZK 
Nagy- Britannia es Franciaorszag ipan uzemei- 
ben vegzett felmeres adatai szermt az 
NSZK-ban alkalmazzak a legszelesebb korben 
az elektronika eredmenyeit az uzemek 47 sza- 
zaleka hasznositja a mikroaramkoroket a gyar- 
tashoz es 13 szazatekuk be is epiti ezeket 
a vegtermekbe Ugyanezek az adatok Anglia- 
ban 43 es 10 szazal6k. mfg Franciaorszagban 
csak 3b es 6 szazalek 




Tobbek kozott a tavfuteses hazak. illetve 
lakasok h<3energia-fogyasztasanak meresere. 
dijkiszamitascra fejlesztettek ki a nyugatnemet 
Siemens vallalamal egy uitranangos muszert 
Ez ultrahanggal men a lakasba befoly6 viz 
mennyiseget 6s a be- es kijov6 viz hflmersek- 
letkulonbsSget Az igy szerzett adatokbbl egy. 
a muszerrel egybeepitett mikroszamit6gep 
szamolja ki a fogyaszttii dijakat 



A szamit6gepesi'tesben nyugat-europai part- 
nered! viszonylagosan elmaradt Ausztnaban 
tavaly mmtegy 70 ezer hazi szam(t6gepet es 
1 2 ezer professzionalis mikroszami'tbgepet 
ertekesitettek Ebben az evben mar. a2 el<5re- 
jelzesek szermt 110 ezer hazi es 20 ezer 
professzionalis mikrogep talal majd gazdara. 




Ket es felmilhb formtos megtakaritast tervez- 
nek a Szegedi Ruhagyarban a szamitogepes 
szabasoptimalizalas bevezetes^vel. A szami- 
t6g6p segitsegevel a ferfioltonyok kiszabasa- 
nal a kb. szazfele oltonyreszt ugy helyezik 
el a szoveten. hogy a legkisebb hulladek 
kepz6djon. 



Az Inovion nevu. Utah allambeli ceg egy 
kulonleges kepfeldolgoz6 celgep forgalma 
zasat jelentette be. A gep ara 3500 dollar, 
alkalmas arra. hogy kamerar6l vagy mas esz- 
kozrtil szarmazo kepeket digitalizaljon 
A szoftver tartalmaz olyan Iehet6segeket. 
amelyek segitsegevel a digitahzalt kepet m6- 
dositam. ..festem' lehet A Personal Graphics 
System nevu gep kepernyGje 512x480 kep- 
pont. az elerheto szi'namyalatok szama a 
kepben 250 000 



Fontos dontest hozott a kozelmultban a 
Szovjetunib Kommunista Partjanak Politikai 
Bizottsaga. Ez ev szeptember elsejetfil az 
orszag valamennyi kozepiskolajaban meg 
kell kezdeni a szamitastechnikai alapismere- 
tek oktatasat. 



A Jarogate nevu brit mikroszamitbgep gyart6 
ceg UJ tobbfelhasznal6s szemelyi szamito- 
gep forgalmazasaba kezdett. A szamit6gep 
neve Sprite. 

Kozponti egysege egy 80286-os mikro 
processzor. alapkiepiteseben 512 kbyte 
RAM-ot. egy 21 Mbyte-os Winchester 
lemezegyseget es egy 790 Kbyte kapacitasu 
floppy lemezmeghajtbt tartalmaz. Ez a kon- 
figuraci6 ket terminal csatlakoztatasat teszi 
Iehet6ve. ara 4995 angol font 
Az operati'v tar b6vi'thet6 2 Mbyte ra. a 



merevlemezes hattertar 150 Mbyte-ra. Ma- 
ximalis kiepitesben 16 terminal csatlakoz- 
tathato hozza. A legnagyobb kiepites ara 
kb. 15 ezer angol font. Az operaci6s rendszer 
konkurrens CP/M 3.1. amely rendelkezik 
PC-DOS emulaci6val. A benchmark kiser- 
letek azt bizonyitiak. hogy a Sprite gyorsabb 
a PC AT-nal. vagy a Motorola 68000-es 
alapu Pinnacle-nel is. A kep tanusaga szennt 
a gyartmany - kuls<5 megjeleneset tekmtve - 
emlekeztet a VT 1 6-osra 
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l3j 32 bites miniszamitbgeppei jeient meg a 
piacon a Data General ceg. Az Eclipse 
MV-1000 SX nevre hallgato gep mmtegy 
harminc szazalekkal magasabb teljesitmenyu 
a ceg el6z6. hasonl6 tipusatol. Alapkiepites 
ben. negy darab taroloval es rendszerszoft- 
verrel ara 223 ezer dollar Az uj eszkozhoz 32 
megabyte-os tarol6b6viteseket es szoftver- 
b6vit6seket aianlanak 



Merfoidkohoz erkeztunk Nehany ewel ez- 
el<3tt racsodalkoztunk. ha f<5leg sz6rakoztato 
hetilapokban horoszkoppal talalkozhattunk. 
Sokan komolytalansaggal is vadoltak az ilyen 
apokat. Aztan arr6l olvastunk. hogy nyuga- 
ton horoszkbp keszitesere szamitbgepet vesz 
nek igenybe Ezen mar csak mosolyogtunk 
S ime most itt a ndeg val6sag: Szentendren 
nehany fonntert mikroszamitogeppel )6sol- 
tathat maganak a h^tvegi kirandulb S. meg 
mondja vaiaki. hogy nem terjed nalunk a 
..modern technika es annak ..modern " 
alkalmazasa. 



A szamitogepekhez hasznalatos kepernyos 
terminalok egyre gyakrabban okoznak kulon- 
fele szempanaszokat. Az esetek szamanak 
novekedese term^szetesen a technika alta- 
lanossa valasaval magyarazhato. A betegek 
legtobbszor gyengen latasra. eget6 fajda'- 
lomra. konnyezesre. gyors szemkifaradasra 
panaszkodnak. melynek oka elsflsorban az 
asztigmatizmus okozta helytelen fenytores 
es a helyis^gek nem kiel6git<5 megvilagitasa. 
MegallapitottSk, hogy ezeken klvul panaszt 
okoz az. hogy a terminal kezel6mek sokat 
kell a keperny6re 6s az adatokat. szoveget 
tartalmazo papirlapokra nezniuk. es a val- 
toz6 tavolsag miatt a pupilla hosszu idfln at 
folyamatosan kitagul 6s osszehuzodik. 
Jelentos befolyasolo tenyezfi a kepernyok 
szine. fenyereje is. 
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A VC-20 vallat6j£t olvasva kiss6 6n is elcsodaikoz- 
tam, talan csak a dokumentaci6 csapnivalos&gaban 
egyeztem meg az olvasottakkal. Amirdl most 6n 
szeretn^k frni az egy sprite-(mano) tervez^s VC-20- 
on, de mtndjirt azt is hozzateszem, hogy ez kdzel 
sem hason!6 a C-64~es6hez. Mint tudjuk, a k£t g6p 
a mem6riam6reten 6s a k6perny6felbontason tul 
abban kufonbozik, hogy a VC-20 nem tud sprite-okat 
tervezni. Ha olyat nem is tud, mint a C-64, de az6rt 
figurakat ezzel a g£ppel is lehet tervezni, mint a 
programbol ki fog derulni. 

Tulajdonkeppen a dolognak a lenyege a jelgenera- 

torban van. A g6p jelgeneratora ROM-ban van 

elhelyezve a 32768-as memdriahelyen kezd6dik 6s 

4 K hosszu. Ez a kovetkezok^ppen oszlik meg: 

1 K - nagybetuk 

1 K - inverz nagybetuk 

1 K - kisbetuk 

1 K - inverz kisbetuk 

A karakterek elhelyezese a mar az Otletbol is is- 
mert modon tortenik: egy karakter 8 byte-on he- 
lyezkedik el, a byte-ok binarisan vannak kodolva 
aszerint, hogy a megadott hely be van-e sotetitve, 
vagy sem. N6zzuk meg p6ldak6nt az A betu elhelye- 
z6s6t : 

I. byte 24 




2. byte 

3. byte 

4. byte 

5. byte 

6. byte 

7. byte 

8. byte 



36 
66 

126 
66 
66 
66 
* 



128 64 32 16 8 4 2 1 



A byte-ok sorfolytonosan vannak elhelyezve a me- 
mori£ban, a karakterek a k^pernyokodoknak meg- 
feleld sorrendben kovetkeznek egym^s ut£n. Tehat: 
@. A. B, C,... (gSpkonyvben megtalSlhatdk). Az in- 
terpreter egy billentyO lenyomasakor a kovetkezd 
m6don talalja meg a karaktert a jelgeneratorban : 
kiolvassa a videomatrixbol az adott karakterthez 
tartozo jelindexet, majd ezt 3-szor balra shifteli 
(szorz£s 8-cal). Az eredm6nyt hozzSadja a 36869 
cimen t^rolt jelcella tartom£ny start cim6hez. A ka- 
pott cfmen talalja meg az interpreter a karaktert 
jellemzd 8 byte-ot §s ezt viszi ki k6perny6re. Ha £t 
akarjuk helyezni a karakterkeszletet, akkor a 36869 
cimen tatelhato startclmet kell modositani. Eredeti- 
leg ezen a cimen 240 tal£lhato,ez 32 K jelgenerator 
cimnek felel meg (nagybetuk). 24 K-34 K-nak felel 
meg (kisbetuk). Athelyezi§shez a kovetkezo 6rt6ke- 
ket kell megadni . 

252- 4 K (4096) 

253- 5 K (5120) 

254- 6 K (6144) 

255- 7 K (7168) 

Elozoleg azonban a karaktereket meg kell tervezni 
(a 8 byte-ot) 6s a megfelelo memoriateruletre be 
kell vinni, majd beirni egy POKE 36869. megfelelo 
ertek. Ezut^n a megfelelo billentyuk elvesztik ere- 
deti funkciojukat, 6s az altalunk megtervezett ka- 
raktert viszik ki a kepernyore. A sprite, hogy jol 
lathato legyen ketszeres nagysagura tervezheto. Az 
eredeti karakterek 8x8-as jelmatrixban helyezked- 
nek el, de van egy lehetoseg 16x8-as jelmatrixok ki- 
v£lasztasara is. Ezt a 36867-es memoriacimen levo 
byte-tal lehet. Ennek bitjei 
0. 0= 8x8-as jelmatrix 
1 =16x8-as jelmatrix 
1-6: kiteszik a videom£trix sorszamat 
7: raszterertek egy elerhe. 
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Ezek utdn nSzzuk a programot: 

A mtikdd6se a kovetkezo: 

A program a 3,5 K-s VC-20 utols6 0,5 K-)6t sza- 
badd6 teszi a tervezend6 6br6k sz6m6ra. 
Ha 16x8-as 6brakat tervezunk ez a terulet akkor is 
32 db sz6mara elegendo. 

Inditas ut6n kirajzolja az 6br6t, ahova meg i kell 
terveznunk a sprite-ot. Ezut6n nyomjuk be a 
CTRL+RVS ON gombokat, igy inverz uzemm6dba 
keruliink. Majd a kurzorrzal felmegyiink a raszter- 
halora 6s a space gomb nyomogat6s6val berajzoljuk 
a megfelel6 6br6t. Ha mindezekkel k«nen vagyunk 
r6vissziik a kurzort a RUN 80-as sorra 6s RETURN-t 
nyomunk. A g6p ekkor helyezi el az 6brat a memorid- 
ba majd vagy ujrakezdjuk eldlrdl az eg6szet vagy 
kil6punk a programb6l 6s megn6zzuk, hogy sike- 
riiltek 6br6ink. Ha k6szen vagyunk, a programot ki 
is tdrdlhetjuk a mem6ri6b6l, 6s dolgozhatunk to- 
v6bb az altalunk tervezett karakterekkel (sprite-ok- 
kal) A sprite-okat a jat6kprogramokn6l megismert 
modszerekkel mozgathatjuk tov6bbra is, rajuk a 
megfelelfl billentyG k6dj6val hivatkozhatunk. A gep 
kikapcsolasa e!6tt aj6nlatos a megfeleld memona- 
r6szt szalagra menteni, hogy ne kelljen ujbo! ter- 
vezni. 

A program resz/etesebben : 

0 sor: felszabadit 0,5 K-t, es kitorli ezt a teruletet 
(7168-7680) 



1-5 sor: k6pernydt torol, sz»nt6ro!6t 6Wt be 
10-40: kil6p az elsd programbol 
80: kezdddik a 2. program. 

100 A k6t program kozotti param6ter-atadasra az 
5400-as membriarekesz szolg6l. Ebben tdroljuk, 
hogy hSnyadik karaktern6l tartunk, es ; ezt adjuk 
hozz6 az uj karaktert6rolo kezd6cim6hez (716b). 
EgyszerG v6ltoz6val ez nem oldhato meg, mivel a 
RUN 80 mtnden valtozbt torol. 

110-160: az e!6bbi abr6ba rajzolt pontok kiolvasasa. 
byte-okka alakit6sa, elhelyez6se a mem6ri6ban. 
170-210: Van e m6g karakter? 

Ha van: 5400-as cim nove!6se 1-gyel, v»sszater6s_ 
Ha nines: 6tvaltas az uj karaktert6rolora (POKt 

Itvllt'6s 5 16x8-as jelm6trixra (P OKE 36867,15 3) 

12 sorunk lesz a k6pernyon ! < ; — 

Aki csak 8x8-as jelmatrixokat akarja alkalmazni, a 

kovetkezo m6dosit6sokat kell eszkozolnie: 

10 FOR I = 1 TO 8 _ 0 

100 . . . . : Q = PEEK (5400) * 8+7168 

110 FOR I = 1 TO 8 

200 torolni: POKE 36867,153 

Mindenkinek sok sikert 6s jo kis6rletez6st kivanok a 
program kipr6b6!6s6hoz. 
Bekesi K&roly 

villamos uzemm6rnok, Kulturalis 
Kozpont Marcali, Sz6chenyi u. 3. 8700 
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A program Iehet6v6 teszi 8 db 8x6 raszterpontbdl 
(4x2 karakter) atakzat tarolas&t, ezek kozul egy- 
idejuleg 4 db megjelen»t6s6t a kdpernydn, a C-64 
gep sprite-jaihoz hasonloan. Egy Iehets6ges alak 
zat pi : 




A<* , 82 , BB ■ 93 
AD , BE , BD , 9F 



16*. W .187 ■ 147 
173 , 190 , 189 , 159 



Az alakzat (sprite) t£rolasa a karakterek ASCII 
kddja alapjan tdrt£nik. Kiszamftasi etv: 



1 


2 




8 


16 


32 



+ 128(Amely»k be vantdltve, azok 6rt6k6t 
osszeadjuk es m£g 128-at hozzaadunk: 



A fenti sprite kodjait melte is irtam (hexadecima- 
lisan 6s decim£lisan is). Ezeket a kddokat kell be- 
tolteni a 8 blokk valamelyikdbe. A sprite-ok helydt 
a k^pernyon 2-2 byte-on kell megadni a kdvetkezd- 
kdppen: kiszamitjuk, hogy a bal fels6 karakter me* 
lyik memoriacellaba kell hogy keruljdn: K = (sorok 
sz^ma) * 64 + oszfopok szdma+ 15360 (itt a sorok es 
oszlopok karaktermeretre vonatkoznak). Majd az 
igy kapott drtdket felbontjuk 2 byte-ra: az als6 
byte KAND 255 muvelettel kaphatd, a felsd byte: 
INT(K/256) muvelettel. Az Igy kapott kdt szamot 
kell betolteni a megfelelo kdt memdriacelteba. 
A sprite-ok helyenek ilyen mddon val6 meghat£ro- 
zasara valok a 0-7. rendszervaltozok a programban. 
A 8. rendszerv£ltozd megfelelo bitj^nek 1-re 6\\it&- 
s£val megjelenithetd b£rmelyik sprite, 0-ra 6llft&sa- 
val pedig kikapcsolhatd. A 9. 6s 10. rendszervdltozd 
megfelelo 4-4 bitjdn meghatarozhato, hogy egy- 
egy sprite afakja melyik blokkban t£rolt kdpnek 



legyen megfelel6. Igy teh£t, ha n6gy helikoptert 
akarnak megjeleniteni 6s mozgatni a k£pernyon, 
nem szuksdges ndgy ktildnbdzd blokkba betolteni 
a fent emlltett kodokat, hanem eldg egybe, a 
blokkmutatot viszont mind a negy sprite-nal arra 
ailitjuk. Ha egy sprite alakjat ki akarjuk cser6lni 
egy masikkal, akkor sem kell a kodokat mozgatni, 
csak a blokkmutatot atalh'tani. 

A rendszervaltozok a 7A70H = 31344 ci'mtol kezddd- 
nek: x=31344. 

x. memdriacella: 0. sprite helyenek also byte-ja 
x + 1. memdriacella: 0. sprite helydnek felsd byte-ja 
x+2. memdriacella: 1. sprite helyenek also byte-ja 
x + 3. memdriacella: 1. sprite helyenek felsd byte-ja 
x+4. memdriacella: 2. sprite helyenek also byte-ja 
x + 5. memdriacella: 2. sprite helyenek felsd byte-ja 
x + 6. memdriacella: 3. sprite helydnek alsd byte-ja 
x + 7. memdriacella: 3. sprite helydnek felsd byte-ja 
x + 8. memdriacella: 

0. bit = 0. sprite engeddlyezdse - letiltasa 

1. bit = 1. sprite engeddlyezdse - letiltasa 

2. bit = 2. sprite engeddlyezdse - letiltasa 

3. bit = 3. sprite enged£lyezdse - letiltasa 
4-7. bit nem haszn^lt 

x + 9. memdriacella: 

alsd 4 bit. 0. sprite blokkmutatdja 

felsd 4 bit: 1. sprite blokkmutatdja 
x+10. memdriacella: 

alsd 4 bit : 2. sprite blokkmutatdja 

felsd 4 bit : 3. sprite blokkmutatdja 
Az drtdkek Basicbdl POKE-utasitassal allithatdk. 
Az alakzatok imdnt emlltett mddon kisz£mitott kod- 
jait a kdvetkezd memdriateruletekre kell POKE- 
olni : 

0. blokk: 7A00H = 31232-7A07H = 31239 

1. blokk: 7A08H = 31240-7A0FH=31247 

2. blokk: 7A10H = 31248-7A17H=31255 
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3. blokk: 7A18H = 31256-7A1 FH = 31263 

4. blokk: 7A20H = 31264-7A27H = 31271 

5. blokk: 7A28H = 31272-7A2FH = 31279 

6. blokk: 7A30H = 31 280-7A37H = 31 287 

7. blokk: 7A38M=31288-7A3FH = 31295 

A sor elej6n Iev6 szam a blokkok sorsz£ma ezek 
koziil a megjelenftent kfv£ntat kell a 9-10. rendszer- 
v£ltoz6ba belrni. A program haszn£lat£t segit meg- 
6rteni az a Basic bemutatbprogram. amit kozoltem. 
Teh6t a Basic program nem tartozik hozza a sprite- 
programhoz, csupan egy demonstr£ci6s program. 
A sprite-ok haszn£lata kiss6 bonyolultnak tGnhet. 
de elonyei miatt azt hiszem, 6rdemes hasznSIm 
a Basic j6t6kprogramokhoz. Hiszen nem kell fog- 
lalkoznunk azzal, hogy az alakzat milyen kSpernyd- 
teriilet eldtt halad el. ugyanis atsiklik felette anel- 



ku\. hogy k£rt tenne benne. A Demo programb6l 
I£that6an m6g egymison is nyugodtan at tudnak 
uszni" a sprite-ok. £s sokkal gyorsabb is, mintha 
Basic-ben £Hand6an ietdroln6nk 6s ujabb helyre ki- 
rajzolnank egy ilyen alakzatot. Itt nem kell a tor!6s- 
sel sem foglalkozni, azt is elv^gzi a rutin. A rutin 
meghiv£sa a mSr emlitett muveletsorral tort6nik. 
A program haszn£lakor vigy£zzunk. hogy a sprite-ok 
helye ne keriiljon a k6perny<5n kiviilre! (Ha el akar- 
juktuntetni, tiltsuk le.) A program 7A00-7B80-ig 
haszn^lja a mem6ri^t. Ez6rt 1000 byte-nSI tobbet 
ne foglaljunk le stringek sz^m^ra! (Vagy bekapcso- 
teskor a READY-re 32230-at vSlaszoljunk.) Ezzel 
sok sikert kfvdnok a program hasznaiat£hoz. 
Zsoldos Zsolt Tata. Eotvos Gimnazium III. oszta- 
lyos tanuldja 
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0 BRK 

Va OR A (zx). a 

5. a ORA x.a 

6,8 ASL jr. a 

8 PHP 

9.8 ORA a 

10 ASL 

13, a.b ORA c.a + 256 • b 

14. a. b ASL c.a*256 »b 
16.8 BPL a 

I7.a ORA (x)y.a 

21 .a ORA x* x.a 

22. a ASL x + x.a 

24 CLC 

25.te.b ORA c* y.a + 256» b 

29. a.b ORA c+x.a + 266*b 

30. a.b ASL c + x.a + 256*b 
32.8. b JSR c.a*256»b 
33.a AND (zx).a 

36 a BIT x.a 

37 a AND x.a 

38 a ROL x.a 
40 PLP 
41.a AND a 
42 ROL 

44.a.b BIT c.a + 256 »b 

46 a. b AND c.a + 256 * b 

46. a. b ROL c.a*256 + b 

48. a BMI a 

49. a AND (x)y.a 
53.a AND x + x.a 

64. a ROL x + x.a 
66 SEC 

57.a. b AND c + y.a + 256«b 

61. a. b AND c + x.a + 256 * b 

62a.b ROL c + x.a + 256*b 

64 RTI 

65. a EOR (xx).a 
69 a EOR x.a 
70.a LSR x.a 
72 PHA 

73.a EOR a 

74 LSR 

76. a.b JMP c.a + 266*b 

77. a. b EOR c. 8 + 256 * b 

78. a.b LSR c.a + 256+b 

80, a BVC a 

81. a EOR (x)y.a 

85. a EOR x + x,» 

86. a LSR x + x.a 
88 CLi 

89.a.b EOR c + y.a + 256 »b 
93a. EOR c*x.a^256»b 

94.a.b LSR c + x.a + 256. b 
96 RST 
97. a ADC (xx).a 

101. a ADC x.a 

102. a ROR x.a 

104 PLA 

105 a ADC a 

106 ROR 

108. a. b JMP (c).a + 256*b 

109. a. b ADCc,a+256*b 

110. a.b ROR c.a + 258*b 
112. a BVS a 



STOP 

A A OR PEEK(PEEK(z*x> + 256 . PEEK(z-*-1>> 

A A OR PEEK (z) 

POKE / (P6EKU) »2)AND 255 

S(SP) P SP SP-1 

A A or a 

A I A . 2) AND 255 

A A OR PEEK (c) 

POKE c ( PEEK(c) • 2)AND 255 

IF NBIT 0 THEN GOTO( PC * a ♦ 256 • ( a 127)) 

A A OR PEEKfPEEKU) + 256 . PEEK <z + 1)*y) 

A A OR PEEK (z» x) 

POKE z»x (PEEK(x* x) «2>AND 255 

C8IT 0 

A A OR PEEK(c-y) 

A A OR PEEK ( c 4 i ) 

POKE cm {PEEK(c + x) • 2>AND 255 

GOSUB c 

A = A AND PEEK(PEEK(z*x)^ 256 • PEEK (z*x + 1)) 
ZB»T-(A AND PEEK(z) 0) NBIT I PEEK(/) AND 128) 
VBIT (PEEK(x)AND 64) 
A A AND PEEK(z) 

POKEz. ((PEEK(x)*2)AND 255) + CB»T 
SP SPM P S(SP) 
A A AND a 

A^ ((A*2)AND255)*CBIT 

2BIT-(A AND PEEK(c)-O) NBIT (PEEK(c)AND 

128) : V8IT (PEEK(c)AND 64) 

A A AND PEEK (c) 

POKE c.{(PEEK(c) - 2)AND 255) + CBIT 

IF NBIT 1 THEN GOTO( PC * a + 256 , ( a 127)) 

A - A AND PEEK( PEEK (z ) * 256 • PEEK(z + 1) + y) ' 

A = A AND PEEK (z + x) 

POKE x+x. ((P£EKU-»).2)AND 255) + CBIT 
CBIT^I 

A A ANO PEEK (c+v) 
A A AND PEEK (c+x) 

POKE c+x.((PEEK(c+x) *2)AND 255) + CBlT 
CONT 

A^A EOR PEEK(PEEK(* + x) + 256» PEEK{/ + x + 1)) 

A = A EOR PEEK (x) 

POKE x. INT (PEEK (z),2) 

S (SP) = A:SP-SP 1 

A-A EOR a 

A b INT (A/2) 

GOTO c 

A A EOR PEEK (c) 
POKE c.INT (PEEK(c)/2) 

IF VBIT = 0 THEN GOTO ( PC ♦ a ♦ 256 » (a - 1 27) ) 
A-A EOR PEEK(PEEK(x) ♦ 266 # PEEK (*+1)*y) 
A-A EOR PEEK (z+x) 
POKE x+x.lNT (PEEK(z*x)/2) 
IBIT = 0 

A A EOR PEEK (cy) 

A A EOR PEEK <c + x) 

POKE c+x. INT (PEEK(c+x). 2) 

RETURN 

A = A+PEEK(PEEK(z + x) + 256 . PEE K(x * x M ) ) « C BIT 
A^A+PEEK(z) + CBIT 

POKE x. INT(PEEK(z),2) 128.(CBIT 1) 
SP ■ SP + 1 A S(SP) 
A = A + a*CBIT 

A = INT (A/2) 128.(CBIT 1) 
GOTO (PEEK(c) + 256- PEEK(c + 1)) 
A A * PEEK(c) * CBIT 

POKE c.INT (PEEK(c) 2 128 • (CB?T 1) 

IF VBIT 1 THEN GOTO (PC + a*256 «(a -127)) 



V B D I 2 C 
1 



0 



♦ + 

♦ ♦ 



113. 
117. 
118. 
120 
121. 
125. 
126. 
129. 
132. 
133 
134 
136 
138 
140 
141. 
142. 
144. 
146. 
148. 
149. 
160. 
152 
153, 
164 
157. 
160. 
181. 
162, 
164, 
165. 
166. 
168 
169. 
170 
172. 
173. 
174. 
176. 
177, 
180. 
181. 
182. 
184 
185 
186 
188. 
189 
190. 
192 
193 



a 
a 

a.b 
a.b 
a.b 

,8 
• 



a.b 
a.b 
a.b 



a.b 
a 



a.b 
a.b 
a.b 



a.b 

a.b 
a.b 
a.b 



196. a 

197.8 

198.8 

200 

201.8 

202 

204. a.b 

205. a.b 
206.8. b 
208.8 
209.a 

213. a 

214. a 
216 

217.a.b 

221. a.b 

222. a.b 

224 a 

225 a 

228. a 

229. a 
230.8 
232 
233 a 
234 

236. a.b 

237. a.b 

238. a.b 
240 a 
241. a 
245. a 
246,8 
248 

249. a, b 

253, a.b 

254. a. b 



ADC (x)y.a 
ADC x+x.a 
ROR x + x.a 
8EI 

ADC c + Y.a+264 
ADC c + xa»25< 
ROR c-x.a+254 
STA (xx). a 
STY x.a 
STA z.a 
STX x.a 
DEY 
TXA 

STY c. a+256 a 
STA c.a + 256* 
STX c.a+256 ♦ 
BCC a 
STA (zta'at, 



z + x,a 
♦•x.a 
x + y,» 



STY 
STA 
STX 
TYA 

STA c+y,a**« 
TXS 

STA cx.a+25e 

LDY a 

LDA (xx).a 

LDX a 

LDY x.a 

LDA x.a 

LDX X.a 

TAY 

LDA a 

TAX 

LDY c.a+256* I 

LDA c.a*256»l 

LDX c, 8*256 . I 

BCS a 

LDA (z)y.a 

LDY x + x.a 

LOA x + x.a 

LDX z + y.a 
CLV 

LDA c*va-25( 
TSX 

LDY c+x.a-256 

LDA c + x.a+25£ 

LDX c + y.a + 25€ 

CPY a 
CMP(zx). a 

CPY x.a 
CMP z.a 
DEC x a 
(NY 
CMP a 
DEX 

CPY c.a + 256 + l 
CMPc.a 
OEC c.a+2J&6*! 
BNE a 4 
CMP <z)y.4 



CMP 

DEC 
CLD 
CMP 
CMP 

DEC 

CPX 

SBC 

CPX 

SBC 

INC 

INX 

SBC 

NOP 

CPX 

SBC 

INC 

BEQ 

SBC 

SBC 

INC 

SED 

SBC 

SBC 

INC 



z + x.a 

/'X.« 1 

c+y.a-251 
c + x.a+261 
c+ x.a* 261 
a 

U*).a 
z.a 
z.a 
z.a 



c a-256 * 
c a*256* 
c.a-256* 
a 

(z)y.a 
z + x.a 
z *-x.a 

c*y.a+26l 
c + x.a + 251 
c + x.a+25! 
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fz)y.a 

y.e>2&6* b 

♦ x.a + 256*b 
c • « a + 256« b 

zx).a 

l.B 

br.a 
El 



c.a+256*b 
c. rt • 256 »b 
c.a^256« b 
a 

^♦x.e 



1 



z+y,? 



C+y 



Jl 

l^256 



» b 



c + x.a*256*b 
a 

.9 
1,8 

z.a 
«,a 



c.a + 256*b 
c.a + 256*b 
c,a + 256»b 
a 

|<z)y.a 

z + x.a 
:i>x.a 

z+y,a 

c + y a*266 * b 

► x,a+256*b 
I c + x,a+256 • b 
; C • y.a*256* b 

Kzx). a 

F 

i ' a 



c.a + 266*b 

> c.a+256* b 
• t 



1 z*-x.a 
z + x.a 



J 



c *y.a ^256 * b 
frc-»-x,a + 2S6»b 
c + x.a*256*b 
a 

(zx).a 
i. a 
z.a 
z.a 



c a + 256 * b 
c.a--256*b 
c.a + 256 + b 

i a 

(z)y.a 
z+ x.a 
z + x.a 

c*y.a + 256*b 
c*x.a + 256*b 
c + x.a*256 *b 



A = A+PEEK(PEEK(z)-256 • PEEK (z » 1 ) «• v) * CBIT 
A = A+PEEK(z + x) + CBIT 

POKE z + x.lNT(PEEK(z + x), 2-128* (CBIT = 1) 
IBIT-1 

A - A + PEEK(c + y) + CBIT 
A = A + PEEK(c+x) + CBIT 

POKE c + x.lNT(PEEK(c + x,'2) 128*(CBIT = 1) 
POKE(PEEK{z*x) + 256*PEEK(z + x + 1).A 

POKE z.y 
PKOE z.A 
POKE z.x 
y = (Y-1)AND 265 
A = x 

POKE c.v 
POKE c.A 
POKE c.k 

IF CBIT -OTHEN GOTO( PC + a*25«x(a - 127)) 

POKE (PEEK(z) + 256*PEEK(z + 1)*y).A 

POKE z + x.Y 

POKE z + x A 

POKE z + y,x 

A-y 

POKE c^Y.a 
SP -X 

POKE c + x,A 

y = a 

A PEEK(PEEK(z+x) + 256* PEEK(z + x*1)) 
x-a 

y=PEEK(z) 
A = PEEK(z) 
x-PEEK(z) 
y = A 
A = a 
x = A 

y-PEEK(c) 
A=PEEK (c) 
x - PEEK (c) 

IF CBIT 1 THEN GOTO( PC ♦ a * 256 • ( a 127)) 

A = PEEK(PEEK(z) + 756» PEEK(z+l)+y) 

y^PEEK (*♦*) 

A = PEEK (z + x) 

x=PEEK (z + y) 

VBIT 0 

A = PEEK(c + Y) 

x = SP 

y=PEEK(c*X) 
A-PEEK fc+x) 
x PEEK (c + y) 

CBIT=-(\' > =a).2B»T=-(y- a) :NBIT = (y- a)ANO 128 
N--PEEK(PEEK(z + x)« 256 . PEEK(z + x + 1 )) :CBIT= -(A : 
ZBIT=-(A = N):NBIT=(A-N)AND 128 

N-PEEK(z):CBIT= (Y - a N ) 2BIT =- ( y - N ) NBIT M y - N) AND 128 
N = PEEK(z):CBIT=-(A - -N) ZBIT - (A = N) :NBIT = ( A- N) AND 128 
POKE z. (PEEK(z)-DANO 255 
y^(y+1) AND 265 

CBIT= (A - -a):2BlT--(A-a):NB»T^(A-a)AND 128 
x-(x-1)AND 265 

N = PEEK(c):B»taUitaa a IM-oi utasitaaaal agye*a 

N = PEEK(c):B»tallttas a 197 es utasitaaaal egyezfi 

POKE c.(PEEK(c)-1)ANO 265 

IF ZBIT^O THENGOTO(PC + a*256 ♦ (a 127) 

N-PEEK(PEEK(z)<256*PEEK(z + 1) + y) 

Bitallitas a 197-es utasitassal egyez6 

N = PEEK(z + x):Bitellitas a 197-es utasitaaaal egyezC 

POKE z + x.(PEEK(z+x)-1)AND 255 

DBIT-0 

N = PEEK(c + y): BrtalHtas a 197-es utasitassal egyez6 

N = PEEK(c*x): Bitallitas a 197-es utasitassal egyez6 

POKE c*x (PEEK(c-x) 1)AND 255 

CBIT (x -a) :ZBIT ~ (x n) NBIT (x-a) AND 128 

A M(A-PEEK(PEEK(z + x)4256. PEEK(z - x - 1 )) )AND 255) + (CBIT 0) 

N PEEK(z) CBlT U - N) :ZBIT - - ( x N ) : N BIT - ( x - N ) AND 128 

A ((A-PEEK<z))AND255)MCBIT = 0) 

POKE z.(PEEK(z) + 1)AND 255 

x (^1) AND 265 

A ((A-a)AND 255) <( CBIT- 0) 

Ures utasitas 

N = PEEK(c) Bitallitas a 228-as utasitassal egyez6 

A-((A-PEEK(c))AND 255) + (CBIT -0) 

POKE c. (PEEK(c) + 1)AND 255 

IF ZBIT-1 THEN GOTO (PC*a + 256 + (a 127)) 

A^(((A-PEEK(PEEK(z) -256* PEEK(z + 1)*y))AND 255) * (CBIT = 0) 

A ((A -PEEK(7-x))AND 255) > (CBIT 0) 

POKE * + x.(PEEK(z + x) + 1)AND 255 

DBIT-1 

A-((A-PEEK(c>y))ANO 255)MCBIT-0) 
A = ((A-PEEK(c*x))AND 255)MCBIT-0) 
POKE c^x. (PEEK(c+x) + 1) AND 255 
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A Commodore VC-20 gepi k6du prog- 
ramozasahoz a Motorola 6502-es pro- 
cesszor utasitaskeszletet kell hasznal- 
nunk. A tablazat also oszlopaban talal- 
juk az utasltSsnak megfelelo k6d sza- 
mat. tovabba. hogy az utasitas hasz- 
nalja-e az utana kovetkezo egy vagy 
ket byte-ot. ,,a" az also byte tartalmat. 
,,b" a masodik byte tartalmat jelenti. 
A tablazat 2. oszlopaban talaljuk az 
utasitas 3-betus mnemonikjat, amely 
az utasitas hatasara vonatkozb angol 
nyelvu rovidites PI. LDA az a "load in 
accumulator" roviditese, leforditva 
,,tolts az akkumulatorba" utasitast je- 
ienti. Ebben az oszlopban talaljuk azt a 
cimzesi format is, amely az utasitas 
utan kovetkezo egy vagy ket byte tartal- 
manak felhasznalasara vonatkozik, 
PI. a z - x. a cimzesi forma jelent6se: az 
utasitas utani byte tartalmabbl egy 
cimet allit elo ugy, hogy hozzaadja a 
X-regiszter tartalmat. Az utasitas az 
,,a" ert^ket zer6laposnak tekinti. ezert 
nines szuksege egy masodik byte-ra. 
Acu ( a256*^b cimzesi forma ezzel 
szemben jelzi, hogy a cim nem zero- 
lapos, ezert sziikseg van mindk6t bytera 
is. amelynek tartalmat az a + 256*b 
keplettel hasznalja fel a processzor, 
vegiil a teljes cimet meg az X-regiszter 
tartalmanak hozzaadasaval allitja elo. 
A harmadik oszlopban talaljuk az uta- 
sitas BASIC-nyelvu megfelelteteset 
vagy leirasat. Amelyikben nines POKE 
utasitas, azokat egy-egy rovid prog- 
ramban kiserletkeppen kiprbbalhatjuk. 
PI.: 29,0,16 ORA c | x. 0^ 256*16 (Az 
akkumulatort a logikai OR kapcsolatba 
allitja a c - x cimz6si formaval eloalli- 
tott cimmel.) 

10 A 25:X r 40:a I 0:b I 16 

20 A A OR PEEK (a + 256 * b + x) 

30 PRINT A 

A negyedik oszlopban talaljuk az uta- 
sitasoknak a feltetelregiszter jelzo bit- 
jeire gyakorolt hatasat. 
Jelolesek: A = akkumulator 

x = x-regiszter 

y y-regiszter 
PC- utasitas szamlal6 

8=^ utasitas utan kovetkezo 

byte tartalma 

b= utasitas utan kovetkezo 
masodik byte tartalma 
S = veremtar 
SP veremtarmutat6 
P = feltetelregiszter 
(kisbetus) z zerblapos cim = a 
(kisbetOs) c = k6t byte-os cim a 
256* b 

(nagybetGs) N, V, B. D, I, Z, C = feltetel- 
regiszter bitjei 

bitet allithat mindket 
fele modon 

0 nullara allitja csak 

1 = egyre allitja csak 

N az utasitashoz felhasz- 
nalt kozbenso adat 



/nkvn/torok kmfstmtnmk I 

A C-/tf-os 4m Sine/sir QL g*pmk vlimtMrm 
kesiulunk Ktrjiik. hogy ahi mir k*H6 tm- 
p+SMtalatokkml rmndmlkazik vmlammlyik gap 
hasxnilatit. programoz&sit MatSan - a sz/- 
vesen riszt wanna a vail at axon - Ir/on na- 
kunk. Rtividan irja la. hogy midta dolgoxik 
a gippal. hogy alStta milyan gSpakan star- 
zatt tapaaxtalatokat. s hogy a C-16. illatva 
a QL programoz&sban meddig jutott. 
Ker/uk. hogy a jelantkezd'k nevuk 4s pontos 
cimuk maltatt. ha Iahets4ges talafon**4mot 
ia k6zol/anak. ahol mmgtalilhatdk. 

- A Szark. - 



S Z A M ITASTECHNIKAI MEUEKIET- IU6USZTUS 



A Hisoft ceg egy j6l megirt. kiforrott Pascal 
fordit6 programot forgalmaz a ZX Spectrumhoz 
HP4T neven. A program tdrzset a 280 mikro- 
processzorra fejlesztettek ki. es adaptaltak min- 
den 280-al mGkodd mikroszamitogepre, 3 egyeb 
Z80-as rendszerekre is. Ebbdl kovetkezden ennek 
a programnak hatalmas nagy a piaca, ezert for 
dithattak a kidolgozasara szokatlanul nagy gon 
dot. Ezt hasznalata soran rdgtdn tapasztalhatjuk : 
kellemes vele dolgozni. es rendkivul hatekony 
forditd Ennek egyik oka a hatekonysagaban rej 
lik: az eldallitott targykod sebessege akar tobb 
nagysagrenddel is meghaladhatja az ugyanarra a 
feladatra irt BASIC programet. Termeszetesen 
a konkret sebessegarany er6sen fiigg a feladat 
jellegetdl. Masreszt a HP4T a file kezelestdl elte 
kintve majdnem teljes PASCAL nyelvet valdsit 
meg. ameiy sokkal alkalmasabb komoly program 
fejlesztesre. mint a BASIC. Joval tobb programo 
zasi eszkdzt tartalmaz. ezzel segiti a felhaszna- 
lot a kiildnbdzd feladatok kivanalmaihoz alkal- 
mazkodni. Talan a legfontosabb elteres. hogy a 
BASIC-ben nines lehetdseg a magasszintG nyel- 
vekben egyebkent megszokott eljaras (szubrutin) 
hivasra. A BASIC GOSUB utasitasa a legprimi- 
tlvebb gepi kddu szubrutin hivassal ekvivalens. 
pi. a Z80 feltetel nelkuli CALL-javal. Meg kell 
jegyeznunk. hogy mar a harmadik generacios 
nagygepeknek is fejlettebb gepi szubrutin hiva- 
suk van. A PASCAL viszont lehetdve teszi a for- 
malis - aktualis parameter cseret 6s az eljarasra 
nezve lokaiis azonosit6k hasznalatat. Ez bizto- 
sitja, hogy zdkken&mentesen vegyuk at masok 
eljarasait vagy sajat korabbi program reszletein- 
ket. Mint latni fogjuk. a MP4T kuldndsen tamo- 
gatja az eljaras gyGjtemeny letrehozasat es uj 
programjainkba val6 rugalmas. kdnnyen kezel- 
hetd beepiteset. 

Azok szamara, akik a ZX Spectrumon szeretnek 
hasznalni a PASCAL nyelvet. nagy segttseget 
jelenthet egy kdzelmultban megjelent kdnyv: 
Varga Imrs-Ury LSsx/6: Pascal Spectrumra 4s 
Commodore 64-re 

LSI Alkalmazastechnikai Tanacsadd Szolgalat 
Budapest. 1985. 

A kdnyv tulnyomdreszt a HP4T-vel foglalkozik. 
A C-64-re harom rendszert ismertet vazlatosan 
a szamos letezd kdzul. Ezek mindegyikere erve- 
nyes a szerzd allitasa: egyik sem ..igazi" PASCAL. 
A Spectrum PASCAL-t teljes reszletesseggel is 
merteti. a HP4T altal megval6sitott nyelv szinta- 
xisat. szemantikajat es a fordit6 hasznalatat 
egyarant. A szerzd tomoren, de vilagosan fogal- 
maz, az egesz kdnyv rendkivul alapos munka be- 
nyomasat kelti. Batran merem ajanlani a 
PASCAL-ban kezdfiknek es haladdknak egyarant. 
(felteve, hogy meg tudjak fizetni). A nehany erte 
lemzavaro sajtdhiban klviil csak egyetlen erdemi 
kifogasom van. Az eljarasok es fuggvenyek for- 
malis-aktualis parametercserejerdl a 38. oldalon 
a kdvetkez6 all: ,,A parameterhivatkozas, akar 
az ALGOL-ban. ketfele lehet: ertek. illetve nev 
szerinti." Ez az allitas felrevezetd. mert a 
PASCAL nak ugyan valdban ketfele parameter- 
hivatkozasi lehetosege van. de csak az egyiket 
tekinthetjuk azonosnak a megfeleld ALGOL hi- 
vatkozassal. Az ertek szerinti parameteratadas- 
nak csak a szintaxisa kulonbozik a ket nyelvben. 
ezeket mGkodes szempontjabol azonosnak te- 
kinthetjuk. A PASCAL masik parameterhivatko- 
zasa viszont a FORTRAN (egyetlen) elm szerinti 
hivatkozasaval ekvivalens. ennel lenyegesen 
osszetettebb az ALGOL nev szerinti hivatkozasa. 



SZAMMASTECHNtKAl MEUEKIET- AUG USZTUS 



Erre a tenyre maguk a PASCAL nyelv definialdi 
is felhivjak a figyelmet K. Jensen-N. Wirth: 
PASCAL felhasznal6i kezikdnyv es jelentes cimG 
konyviikben. A felhasznaloi kezikdnyv bevezete- 
seben ismertetik a f6bb eltereseket mas magas- 
szintG nyelvektdl. itt kihangsulyozzak, hogy a 
PASCAL-ban nev szerinti hivas nines. A Varga- 
konyvben ez csak egy elnevezesbeli tevedes. 
mert a cim szerinti hivatkozas lenyeget kesdbb 
helyesen magyarazza. 

A HP4T adaptalasa a ZX Spectrumra tobb lepes- 
ben ment vegbe. egymassal felulrdl kompatibilis 
valtozatok jelentek meg. Hazankban harom ver- 
zio kdzismert. ezek a kibocsatas sorrendjeben a 
kdvetkezdk : 



verzid- nev kezddcim hossz 

szam 



VI .4 HP4S 24598 21105 

V1.5 HP4T15M 24598 21462 

V1.6 HP4TM16 24598 21609 



A HP4S nem tud microdrive-ot kezelni. es a 
magndn is mas formatumot hasznal. mint a ke- 
sdbbi valtozatok. Jo tudni, hogy a HP4S-sel f el - 
vett forrasnyelvQ szoveget be tudjak olvasni a 
kesfibbi vaitozatok. de forditva nem. Az 1.5-6s 
es 1.6 os valtozatok - mint ahogy a neviikben 
levO M betQ is mutatja - kepesek mircodrive-ot 
kezelni. Az dsszes mQveletet. amit a HP4S mag- 
n6n vegezni tud ezek a valtozatok microdrive- 
val is vegre tudjak hajtani. A H P4T1 5M tobb 
hibat tartalmaz a gyartd c6g sajat bevallasa 
szerint is. ezert hasznalat ellenjavallt. 
A Hisoft hirdeteseiben regota olvashatjuk, hogy 
dolgoznak egy olyan valtozaton. amely a PASCAL 
szabvanyos file kezeleset megvaldsitja a micro- 
drive-on. Nines informacidm arrdl. hogy ez a 
valtozat kaphatd-e mar a piacon. (Ha valakinek 
megvan, kerem. feltetlenul ertesitsen.) 
Mint mar emlitettem. a HP4T majdnem teljes 
PASCAL-nyelvet val6sit meg. A lenyeges korla- 
tozasok a kdvetkezdk: 

(1) File tlpus nines. lEz egy igen gyors es meg- 
bizhatd hattertar (pi. Winchester diszk) hianya- 
ban nem tul erds korlatozas.) 

(2) Formalis es aktualis parameter nem lehet 
f uggveny vagy eljaras 

(3) Record valtozdreszt nem tartalmazhat. Azaz 
a record deklaracidban nem szerepelhet a CASE 
tdbbiranyu elagazd utasitas. 

(4) Mutatd tipus nem mutathat mutatdra. 

(5) A halmaztlpus csak a 0. .255 intervallumon 
vagy ennek egy reszintervalluman definialhatd 
Peldaul a VAR halmaz 1: SET OF 256. .267. 
deklaracid nem megengedett. (Viszont az alap- 
halmaz maximalis merete kellemesen nagy.) 
Nemi ellensulyozaskent a HP4T kiterjeszti a 
CASE tdbbiranyu elagazd utasitas lehetdsegeit : 
a cimkevel ellatott utasitaslista vegere az END 
lezaras helyett felvehetiink egy ELSE agat. Erre 
csak akkor kerul a vezerles, ha a szelektor kifeje- 
zes erteke a lista egyik cimkejevel sem egyezik. 
Ha valamelyik listaelem veqrehajtddott, akkor az 
ELSE ag kimarad es a CASE utan kdvetkezd uta 
sitasra kerul a vezerles. 

Tekintsuk it rdviden a HP4T felepMsit 6s hasx- 
nilatit. 

Harom fd reszt kuldnbdztethetunk meg: szdveg- 
szerkesztd. forditd. futasidd rutinok. 



A szdvegszerkesztd (editor) teljesen felulbiralja 
a BASIC billentyOkezelest. Ennek kdvetkezteben 
le kell mondanunk az automatikus kulcsszavas 
uzemmddrdl. pedig ez azoknak. akik megszoktak. 
nagy segitseget ad a gyors 6s hatekony program 
fejleszteshez. Azt hiszem. a ket nyelv gydkeresen 
elterd kulcsszokeszlete miatt nem lehetett jobb 
megoldast talalni. mint hogy mindent karakte- 
renkent ki kell irni. A programszdveg javitasa 
kenyelmesen vegezhetd valtozatos lehetdsegek 
allnak rendelkezesiinkre. (PI- sorszam szerinti ja- 
vitas vagy karakterlanc-keresds es szukseg ese 
ten cserel) Itt jegyzem meg. hogy ugyanez az 
editor talalhatd meg a Hisoft ceg masik kivald 
programtermekeben a GENS3 assembler forditd- 
ban. Egyetlen kdnyelmetlen tulajdonsaga van 
ennek a szerkesztonek. hogy egy sor javitasa 
kdzben (edit mddban) a DELETE gomb nem 
tdrdl, csak a kurzort lepteti eggyel vissza. Tdrles- 
re ket lehetdsegunk van: vagy az E (edit) parancs 
K (kill) alparancsaval tbroljuk azt a karaktert 
amelyen a kurzor all. vagy az I alparanccsal insert 
mddba lepunk. ahol a DELETE gomb eredeti 
funkcidjaban mOkddik. A K lenyomasakor nem 
latjuk. hogy mit tdrdltiink. ez tobb karakter 
eseten zavard. A program beirasa kdzben eld 
DELETE funkcidt edit mddban tul kdriilmenyesen 
erhetjuk csak el: eldtte insert almddba kell lep- 
nunk. onnan tdrles utan ENTER-rel kell vissza- 
tdrniink edit mddba. Azt hiszem. a HP4T editora 
meg ezzel a kis hibaval is hatekonyabban hasz- 
nalhatd szdvegjavitasra mint az eredeti Basic 
editor. 

Editor parancsokkal tarolhatjuk a forrasnyelvQ 
szdveget magndn vagy microdrive-on. A kivitelre 
a PUT parancs szolgal. Az fgy kivitt programot a 
G ET paranccsal olvashatjuk be. A magnd es micro - 
drive kdzti valasztas newalasztassal kdzvetve 
tortenik. Ha a nev elsd karaktere 1 es 8 kdzdtti 
szamjegy. a masodik pedig kettdspont (:) akkor 
a valasztott periferia az elsd karakterrel megadott 
sorszamu microdrive; a tenyleges nev pedig az 
utolsd hat karakter lesz. Ez a konvencid minden 
hattertar -kezelesi mOveletre ervenyes Magnd- 
rdl lehetdseg van ures newel olvasni. ekkor az 
elsd megtalalt file tdltddik be, bizonyos meg 
szoritasokkal. Hasznos a B parancs. amely vissza- 
adja a vezerlest a Basic interpreternek. BASIC- 
bdl harom cimen indithatjuk a HP4T-t: hideg- 
start (a forrasnyelvQ szdveg tdrlddik): 24598: 
melegstart (a forrasnyelvQ program megmarad): 
24603; ha beolvasaskor nem hagytuk automat i- 
kusan elindulni. akkor az elsd indites cime 24608. 
Ha az elsd indites mar megtdrtent. akkor a 
24608 cimre adott vezerles teljes memdriatorles- 
hez vezet. 

A HP4T forditd reszet ketfele uzemmddban hasz- 
nalhatjuk. Programfejlesztes kdzben kenyelmes 
a PASCAL nyelvO szdveget es ennek leforditott 
targykodjat egyszerre a memdriaban tartani (a 
forditd mellett). Ha a program merete ezt lehe- 
tdve teszi. akkor hasznalhatjuk a compile paran- 
csot, melynek alakja: Cn. Hatasara a forrasnyelv 
program az n-edik sortdl kezdve leforditddik. 
Ha n et elhagyjuk. akkor az elsd letezd sortdl 
indul a forditas. A szintaktikus hibakrdl egyertel- 
mu uzeneteket kapunk forditas kdzben. A hibas 
sor utan megall a forditd, megjeldli a hiba vald- 
szinu helydt es egy szammal kddolt jelzest ad 
a hiba jellegerdl. Ekkor az E lenyomasaval javit- 
hatjuk az adott sort vagy a P lenyomasaval az 
eldzdt. Minden mas billentyQre folytatddik a for- 
ditas. de ilyenkor a hibajelzesek tdbbsege hamis 

O 
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a korabbi sor Artelmezesenek elmaradasa miatt. 
tehat nam erdemes tovabb engedni a fordltast. 
A HP4T kihasznalja. hogy a PASCAL-nyelv 
szintaxisa Iehet6ve teszi az egymenetes fordltast. 
A forditasi id6 meglepCen csekely. ha a forditas 
kdzbeni listazast letiltjuk. akkor 100 soronkent 
kb. 1 masodperc. A letiltast egy forditasi opci6val 
vagezhetjiik. amely megjegyzes formajaban a 
programban barhol elhelyezhetS. Alakja: <$ L -}. 
ahol $ jelzl a fcrditdnak, hogy opcid kdvetkezik. 
az L a listazasra utal. a - pedig a letiltasrdl intez- 
kedik: az opcid utan Iev5 sorok nam Iistaz6dnak. 
(Az alapertelmezes L+. azaz minden sor Ilstaz6- 
dik.) Ha az L - kladasa utan szintaktikus hibat 
talal a fordit6, akkor a hibas sort kilrja, a javltas 
ugyanugy vegezhetfi, mint L+ esetben. A futas 
kdzbeni ellenSrzesek vezerlesere meg szamos 
opci6t hasznalhatunk ugyanilyen szintaxissal. 
Meg egy hasznos forditasi opci6t szeretnenk 
megemllteni, amelynek hatasara a fordltand6 
szoveg a hattertarrdl olvas6dik be, a mem6naban 
valo tarolas nelkiil. Alakja: {$ F nev}. ahol a 
nev egy magndra, vagy microdrive-ra elmentett 
forrasnyelvG program file neve. Magndra az 
ilyen file-okat specialis formatumban, a W pa- 
ranccsal kell elhelyezni, microdrive-on erre nines 
sziikseg. ott erre a celra is a P parancsot kell 
hasznalni. Ezzel olyan hosszu programokat is 
futtatni tudunk, amelyek targyk6djukkal egyutt 
nem fernek el a mem6riaban. Masreszt ez az 
opci6 ad Iehet6seget, hogy uj programjainkba 
kenyelmesen beepithessiik a gyakran hasznalt 
programreszleteket. 

A masik fordit6i iizemm6dban olyan targykodot 
alllthatunk elfi, amely a HP4T membriaban val6 
jelenlete nelkiil futtathat6. Erre a translate pa- 
rancs szolgal. Alakja: Tn„f (A HP4S-nel csak Tn 
irhat6, f automatikusan az el6z6leg mas hatter- 
tar mQvelettel beallltott ertek.) Ennek hatasara 
iefordlt6dik a forrasprogram, ez utan az ..OK?" 
uzenet jelenik meg. Ha erre Y-al (yes) valaszo- 
lunk, akkor a targykdd es a futasidC rutinok 
elmentfidnek a hattertaron. Az OK? kerdesre 
azert van sziikseg. mert a folyamat a fordlt6 
torl6d6sevel jar. viszont ha barmilyen Y-tdl kii- 
I6nb6z6 billentyQvel valaszolunk, akkor semmis- 
nek minSsul a transzlalasi kiserlet. 
A HP4T altal megvaldsltott - a szabvanyos 
PASCAL-ban nem szerepl6 - utasltasok kdzul, 
csak kettfire szeretnek kiterni, ezek egyfajta 
elemi f ile-kezelest val6sltanak meg. TetszGleges 
memdriaterulet kivihet6 hattertarra a TOUT 
(nev, elm, hossz) eljarassal. A nevnek pontosan 
nyolc karakteres stringnek kell lennie (mert 
tlpusa ARRAY(1 .8) OF CHAR), ez lesz a file 
neve. (Az els6 karakterrel itt is kivalaszthatjuk 
a microdrive-okat). A masik ket parameterrel 
art adjuk meg, hogy melyik cimtol hany byte-ot 
klvanunk kivinni. A kimentett informacidt vissza- 
olvashatjuk a TIN (nev. elm) eljarassal. Itt nines 
sziikseg a hossz megadasara, mert azt ugyis 
tartalmazza a file fej. a elm megadasaval viszont 
mashova olvashatjuk be az informacidt. mint 
ahonnan kivittuk. Ezek az eljarasok ket specialis 
fuggveny segitsegevel hasznalhatdk kenyelme- 
sen. Ezek lehetove teszik, hogy tetszdleges tipusu 
valtozdkat (tehat pi. tdmboket is) ugy vigyunk ki 
es olvassunk vissza. hogy kozben nem vesziink 
tudomast a konkret kezddclmiikrdl es meretuk- 
rdl. Ezek az ADDR (V) 6s a SIZE (V), ahol V egy 
tetszoleges tipusu valtozd azonositdja. Az ADDR 
megadja azt az egesz szamot. amely a valtozd 



kezddcime a memdriaban. s SIZE pedig a hosszat 
byte-okban. Hasznalatukra pelda: 
TOUT ( A vektor', ADDR(A). SIZE (A)); 
TIN ('A vektor', ADDR (B)); 

Eldszor egy A vektor nevG file-ba kivittiik az 
A azonositdju valtozd tartalmat. kesdbb vissza- 
olvastuk a B valtozdba. 

Vegiil szeretnek nehany konkrdt adatot kozolni 
a forditd hatdkonysagardl. A PASCAL/BASIC 
feladattdl fiiggd sebessegarany alsd hatara 15 
korul van. Ezt csak rovid programokkal lehet 
elerni. amelyeknel meg nem nyilvanul meg a 
BASIC-nek az a hatranya. hogy a futasiddigdny 
novekszik pusztan a programszoveg terjedelme- 
nek gyarapodasatdl. Meg kell jegyeznem, hogy 
mar ez a sebessegarany is mindsegi kiilonbsdget 
jelenthet egy program gyakorlati alkalmazasa- 
nal. Peldaul egyaltalan nem mindegy, hogy olyan 
f iiggvenygrafikonok eldallitasara. melyekbdl 
tobb tucatra van sziiksdgiink, 70 masodoercet 
kell varnunk vagy csak otdt. Komoiyabb felada- 
tokra Irt programok eseteben a sebessegarany 
jelentfisen megndvekszik. PI. tdbbvaltozds fiigg- 
venyek minimumanak szamltasanal a sebesseg- 
arany eleri az dtvenet. Hasonld drtekeket tapasz- 
taltunk a kdzdnsdges differencialegyenlet-rend- 
szert megoldd negyedrendO Runge-Kutta integ- 
ratornal is. A nagyon sokszorosan egymasba- 
skatulyazott ciklusokat felhssznald programok 
eseten 100 koruli sebessegaranyt is tapasztaltak. 
Az altalam ismert legszelsdsegesebb peldat a 
mar emlitett Jensen -konyvben szereplfi primszam 
generald program adta. A program 1-t6l 10000-ig 
allitja eld a primszamokat az eratoszteneszi szita 
algoritmussal. A HP4T-vel megvaldsltott .valto- 
zat futasideje egy jellemzd pontig 4 mp volt. 
A BASIC valtozat ugyaneddig a pontig 40 percig 
futott. tehat a sebessegarany 600. Ezt elsdsorban 
azzal magyarazhatjuk, hogy a PASCAL halmaz- 
mOveletek nagyon gyorsak, es a BASIC-bdl tel- 
jesen hianyzik ez az adatabrazolasi lehetdsdg. 
A relativ adatok utan ismertetndk kdt abszolut 
sebessegadatot is. ahol a megfeleld BASIC- 
program futasideje nem ismert. Egy altalam Irt 
Gyors Fourier Transzformacid helytakarekos val- 
tozata egy 256 pontbdl alld meresi mintat 21 
masodperc alatt transzformal. Ez a transzforma- 
cidhoz szukseges szinusz es koszinusz ertekeket 
mindannyiszor kiszamolja, ahanyszor felhasznal- 
ja 6ket. Az idfitakarekos valtozat ezeket az erte- 
keket a fdprogrambdl egy tombben atveszi 
(ezzel ugyanannyi memdriat foglal el, mint a 
hasznos informacidval). Ennek a futasideje 11 
masodperc. Ez a kdzelmult minigepein tisztan 
gepi kddban fejlesztett programokdval azonos 
teljesitmeny ! Klvancsisagbdl elvdgeztem a 
BENCHMARK tesztet a HP4TM16-al. A ciklusok 
futasszamat 32-. illetve 16-szorosara kellett no- 
velnem, hogy egyaltalan merni tudjam az iddt. 
A tablazatban kozolt adatok 1000 lefutasra van- 
nak atszamolva. A masodik sorban a PASCAL- 
BASIC sebessegarany szerepel. Ezzel kapcsolat- 
ban meg kell jegyeznem. hogy az en gdpemen a 
BASIC futasiddk ndhany szazalekkal kisebbek 
voltak, mint a BIT-LET 1984. januari szamaban 
olvashatd iddk. ValdszinQ, hogy a ket meres 
elterd verzidszamii ZX Spectrumokon tdrtent. 
A sebessegaranyt a sajat mdrdseim alapjan sza- 
moltam. A BASIC-rdl PASCAL-ra fordltasnak 
tobb lehetdsege is van, ezert kdzlom az altalam 
hasznalt programok listait is. 

Tarndczi Tibor 



Futasidd (s) 
Sebessegarany 



BM1 

0.070 
63 



BM2 
0,055 
147 



BM3 
0,700 
29 



BM4 

0,573 
36 



BM5 

0,655 
34 



BM6 
0.975 
54 



BM7 

1,28 
61 



BM8 

11.0 
22 





10 PROGRAM BENCHMARK I i 
80 VJAR K : INTEGER, 
30 BEGIN 

70 URXTELNC'EM ; 

00 END. 



10 PROGRAM OENCHMRRKa; 

ao laoel i; 

30 URR K: INTEGER; 

40 BEGIN 

50 PAGE; 

00 URITELN ( 5 ) ; 

70 

So 1 iF K*<3aioo THEN GOTO i; 

100 URITELN ('C')i 
110 END. 

>L 10 PROGRAM BENCHMARKS; 

30 LABEL 1, 

30 VRR K , A : INTEGER; 

40 BEGIN 
B0 PAGE, 
60 URITELN ( ' B ' > ; 
70 K:«0; 

80 1: K: »K*1; 
00 A;«K DIW> K tK4K-K; 
100 IF K<15000 THEN GOTO 1; 
110 URITELN ( 'E' ) ; 

180 END. ________ 



>L 



10 PROGRAM BENCHMARK4; 

SO LABEL i; 

30 UAR K < A : INTEGER; 

40 BEGIN 

B0 PAGE, 

60 URITELN ( '6' ) ; 

70 K:«0; 

80 1:K: »K*l; 

90 A:«K div; ats^^-B;^^ 

100 IF K< 16000 THEN GOTO ii 

110 URITELN ( 'E' ) ; 

180 END. 



>L 



10 PROGRAM BENCHMARKB; 

80 LABEL 1/ 

30 VAR K ; INTEGER; 

40 A_B>C:REAL; 

50 BEGIN 

60 PAGE , 

70 URITELN ( ' 5 ' ) t 

80 K:«0; 

90 1; K: »K+1; 
100 A;«50R(K); 
110 B: »LN (K) j 

130 IF*K< 1000 THEN GOTO 1« 
140 URITELN CE' ) ; 
150 END. 



>L 



10 PROGRAM BENCHMARKB; 

ao LABEL l; ^ 

30 UAR K x A: INTEGER; 

40 PROCEDURE EMPTY; 

50 BEGIN 

60 END; 

70 BEGIN 

80 PAGE J 

90 URITELN C B ) ; 
100 K;«0, 
110 1:K: -K+1; 

iao A: «k div a*3+4-5> 

140 IF P K^i6000 THEN GOTO U 
ISO URITELN ( ' E ' ) / 
160 END. 



>L 



10 PROGRAM BENCHMARKB; 
80 LABEL l; _ 

50 PROCEDURE EMPTY ; 

60 BEGIN 

70 end; 

60 BEGIN 

90 PAGE, • ... 

100 URITELN i' 5 ) / 
110 K:»0; 

180 iiK: sK-^1, _ - • ^, 
130 A: •K^DXV 3*3^4-5, 

F0R T L ; : «1 TO 5 DO; ^ , . 
IF K< 16000 THEN GOTO 1, 
URITELN ( ' E ' ) 



140 

150 
160 
170 

180 END. 



>L 



10 PROGRAM BENCHMARK7; 

ao LABEL i; ^.^W, 

30 VAR K, A, L: INTEGER, 

40 M: ARRAY CI. .53 OF INTEGER, 

SO PROCEDURE EMPTY; 

60 BEGIN 

70 END; 

80 BEGIN 

90 PAGE; 
100 URITELN ( ' S ) ; 
110 K *0, 
130 l.K; -K+1, 
130 A:»K DIU 3t3+4-5, 
140 EMPTY; 
150 FOR L : a 1 TO 5 DO 

^% IF%<iS84B THEN GOTO U 
180 URITELN ( •€'> # 
190 END. 



Szomoru nap volt V. 28. (kedd) 
Szamos mas gondom mellett az is 
emlekezetesse tette. hogy ismet 
egy olyan konyvet vettem kezbe. 
amelynek megirasat regdta terve- 
zem. (Sajnos nem ez az elsd alka 
lorn, peldaul Csakany-Vajda : Jate- 
kok sz6mitdg6ppel 6s Szekely 
Gabor: Paradoxonok a veletlen ma- 
tematikajaban olvasasakor ereztem 
mar hasonldt.) 

Orommel udvozldm ugyanakkor az 
elsd nagy peldanyszamu vasarol 
hat6. magyar nyelvO BASIC-tan- 
kdnyvet. A BASIC-nyelv magyar- 
orszagi terhoditasanak 3-4. eve- 
ben vegre megszuletett a nagy 
hianyt potl6 mu : Pal Zsuzsanna- 
Revbird Tamas: Hetedhet C-16 
(es C-64). Kiadd es terjesztd: 
Novotrade RT. Az alabbiakban ar- 
rdl lesz sz6, miert tetszett (es per- 
sze a teljesseg kedveert, mennyi- 
ben nem tetszett), illetve miert 
tartom elsdnek a mGfajban. 
Tetszett - a stilusa. hangvetele. 
A cim es az emblema azt sugallja. 
bogy gyerekeknek szantak a szer- 
zok. Sok 9-10 eves tanuldval kiser- 
leteztem, kivetel nelkul folyamato- 
san tudtak olvasni. Ezen felbato- 
rodva nem szakember felndttek 
kezebe adtam. Oket jobban zavarta 
a fogyatekos nyomdatechnika, de 
szinten ertettek, sot ravaszabb ke- 
resztkerdesekre is elfogadhato va- 
laszokat kaptam. Ugyanakkor felek. 
a Tankonyvkiadd nem osztana ve- 
lemenyemet. hasonld stilussal ed- 
dig csak a Zsolnay-kiserlet mert 
prdb6lkozni. Kulon szerencse, hogy 
..oktett". ,,helydr". ..modul" es 
tarsai nem vetettek at! 
Tetszett - pici fenntartasokkal - 
ezekrdl kdsdbb - az aranyerzeke. 
Peldasan egyensulyoz egyszerQ, il- 
letve bonyolult es fontos dolgok 
kozott, ami a folyamatos olvasha- 
tdsag alapfeltetele. Zsenialis az 
,,angol-magyar helyesiras" cimQ 
gordiuszi csomd szetvagasa a 106. 
oldalon (az oldalszamozas irasom- 
ban: 1 00 * kdtet-oldalszam) : 

- a gepen csak az angol abece 

betOi talalhatdk meg. Ezt azonban 
elegge konnyO megszokni; csak 
egy dolog fontos: hogy emiatt 
senki se felejtse el a magyar helyes- 
Irast!" 

Figyelmes, hogy szerz6k gondoltak 
az angolul nem (tokeletesen) tud6 
olvasdra is: jelentes. helyesiras. 
s6t nehol angol-amerikai elteres 
(pi.: 147. oldal). 

Tetszett - Lenyegeben a tagolas. 
Kellemes a terjedelem. es a harom 
kotet. A huszonegy resz sorrendje 
is nagyjabdl indokolt, 6s kb. kulon 
,,6rakkent" (15-30 percekkent) ve- 
hetdk a reszek. 

Tetszett, hogy peldaul a valto- 
z6k (azonosit6k) tobbszor is el6- 



jottek, 6s szaraz pr6dik6ci6 helyett 
szinte 6szrev6tlenul szed fel az 
olvasb nemi .,matematik6t". A gra- 
fika is fokozatosan tarul fel, ala- 
huzva a tankonyv 6s k6zikonyv 
kozotti kulonbseget. Elvezettel ol- 
vastam az ,,Ezzel az informiciovai 
egyeldre nem sokat tudunk kezde- 
ni. de ..." kezdetO mondatot a 113. 
oldalon. 

sdt lenyOgdzdtt a megjelen6s 
sebess6ge. Csak sejtjuk m6g. hogy 
C-16 lesz szeptembertdl az isko- 
lakban, 6s ime, maris. Hej. ha a 
HT . Ez a t6ny m6g a nyomda- 
technika hibait is menti. 
Tetszett - a GOTO - FOR - IF 
utasitasok bemutat6sanak ilyen 
sorrendje. Nem allitom. hogy ez az 
lidvozitd, de impon6lt, hogy valaki 
ezt is megprobalta. Tapasztalataink 
szerint ez gyorsabb. sim6bb ut. 
hatranya. hogy az IF I6nyege kev6s- 
b6 rogzddik - viszont a FOR jobban. 
Tetszettek - emberszabasii p6l- 
dak, 6s f6leg jbpofa. egyszerQ 6sz- 
szefoglald k6rd6sek - ahol vannak. 
Ideertem a sz6nd6kos hibakat is 
(pi.: 122., 218. oldal). 
Tetszettek - a ,,motiv6lt okta- 
tas" cimO didaktikai bravurok. 
A 121. oldalon p6ldaul soronk6nt 
torolhetunk egy programot (ez 
mar ism6tl6s). majd a .faradt" 
olvaso orommel latja a NEW pa- 
rancsot - 6s meg is jegyzi egy fcletre 
Nagyon tetszett a konyv! Elso- 
sorban az eg6sz, de tetszett sok 
aprb otlet. amelyek I6nyegesek. 
Tetszett a szerzdparos osszete 
tele: A sz6mit6g6pet eppen izelgetd 
nem-mOszaki (Revbiro T.) saj6t 
szavaival irja le azt a folyamatot. 
amint egy szakember (P6I Zs.) be 
vezeti 6t a programozas vilagaba. 
(Szubjektiv) fenntartisaim I6nyeg- 
telen aprosagokkal kapcsolatban 
vannak : 

f. Az INST/DEL billentyO hasznala- 
tat k6s6bbre tenn6m, hiszen bizo- 
nyos esetekben (") meglepO hata- 
sa lehet. 

2. Kicsit koran szerepel tul sok 
billentyO. C^gombot elhalaszta- 
nam n6h6ny fejezettel. 

3. Vitathatbnak 6rzem a 3. fejeze- 
tet. Kulon v6lasztan6m a LOAD - 
6s kesobb a SAVE parancsot, sdt 
sokkal k6s6bbre tenn6m a VERIFY, 

OPEN-nel kapcsolatos tudni- 
valbkat. 

4. 156-157. oldalakon van olyan 
utasitas. a listakban. ami m6g nem 
szerepelt (IF, READ, GET). Ezt II- 
lene emliteni, ha az ellenkez6j6t 
hangsulyozzak a 155. oldalon I 

5. Picit tobbet Irn6k az IF-rOI. v6le- 
menyem 6s tapasztalataink szerint 
ez a legprobl6masabb utasitas. 
Szerzdk mindossze k6tszer annyi 
fejezetet szannak erre (10. 6s 17.), 
mint az 6r6ra. 



5. MAr szidtam az olvashat6s6got. 
Konkr6tabban : Nines 6kezetes szer- 
kesztd? Nines szebb printer? M6r 
ujsagban (pi. BIT-LET) is lattam 
olvashatobb listakat! 
Ennyit errdl a konyvrdl. Ami most 
kovetkezik. az a tobbi BASIC-tar- 
gyu iz6r6l sz6l. EI6lj6r6ban egy 
XX. szazadi nepi bdlcsesseget sze- 
retnek megosztani a nyilv6noss6g- 
gal: altalaban ne a szerz6t szidjuk. 
a hibakrol 5 tehet a Iegkev6sb6. 
A lektor is felelds, de leginkabb 
a kiadd. 

H6mori Miklbs nem tul olvasma- 
nyos, tal6n unalmas konyv6t (1 ) 
pr6balta feldobni egy pici BASIC- 
bet6ttel. 32 oldalon foglalja ossze 
a tudnivalokat, Iatsz6lag g6ptdl 
fuggetlenul, de 6rz6sem szerint 
elsfisorban ABC-80-ra gondolva 
(a konyv ir6sakor ez volt a legelter- 
jedtebb tlpus). A ,.MM. rendelet6- 
re" k6sziilt mu sem sikeredett 
TAN-ra. b6r ez k6tszer is szerepel 
a cimben. 

A HT-hez h6rom 6v alatt sem jott 
ossze elfogadhato segedanyag. A 
gy6ri kiadvanyrol (2) m6r volt sz6 
a BIT-LET 1983. novemberi VAL- 
LATO-jaban - erre nines ments6g. 
A Tudom6nyszervez6si 6s Informa- 
tikai Int6zet - menedzselte ,.HT 
kezddknek" (3) semmivel sem jobb, 
raadasul a ,.kezd6knek" cimz6s 
erthetetlen. A bevezet6sben tudjuk 
meg. mi a kulonbs6g a BASIC-bo- 
vit6s kulbnbdzd bel6p6si pontjai 
kozott. A ,,Parancsok" fejezet csak 
a CLOAD. RUN. LIST, CSAVE-r6l 
tud, mig az ..Utasitasok" mindossze 
hatot targyal. Tbmbok I6t6r6l a v6l- 
tozdk dimenzion6lasakor ertesu- 
lunk. j6val a FOR el6tt. Ezuton tu- 
datom a szerzokkel. hogy a THEN/ 
ELSE utan utasitasok is irhatbk! 
READ-DATA mi6rt elobbre val6 
mint az INPUT? 

Az Alcock-R6nky-f6le kezirasos 
konyv (4) egyetlen komoly baja. hogy 
ez volt az elsd nagy peldanyszamu 
kiadvany. Masodik- harmadiknak 
zseni6lis, de kezddknek nem mer 
o6m ajanlani. Amugy igen j6 k6zi- 
Kbnyv. kellemes stilussal. A sajto- 
hibak koruli huzavona, mondhatni 
szajtepes nevets6ges: nem mulja 
felul lenyegesen a hazai 6tlagot. 
Ktfhegyiek ..nyelvjarasai" (5) meg 
jobban tetszett, gyorsan kovette 
p6ldaadojat. Sajnos erfisen tamasz- 
kodik is ra. igy kezddknek szint6n 
nem optimalis. jollehet didaktiku- 
sabb. Nagy hiba, hogy a kiadd nem 
mert tobb konyv 6n6H6 megirasara 
batoritani Szerzdk meg tudtak 
volna birkdzni a feladattal, sdt ugy 
tunik, az eredetinel kedvezdbb 
szinten ! 

Bodor-Gerd I6legzetelallit6 alko- 
tasa (6) sok fejtorest okozott. Vi- 
szonylag koran k6szult. kifejezetten 



alacsony szintrdl indul 6s helyen- 
k6nt 6tgondolts6g latszatat keltve 
halad. Nos, rejtely. hogy hova, 
,,Adatnevek". ,, Program folyamat". 
,.Kivez6relt feltetelszerkezetek 
fejezetcimek csak a szamitastech- 
nikai jogaszokat nem riasztjak el. 
Szinten nem laikusoknak vald a 
FOR t megeldzd ON. GOSUB. 
AND OR stb. illetve a tom6ntelen 
blokkdiagramszerG 6bra. A 
,.Programoz6si konvencidk" a v6- 
gefel6 viszont egy nyari tabor ne- 
buldinak is unalmas. Esetsz6tv6- 
lasztasra sokkal szebb p6lda egy 
barkochba, mint a visszakoszond 
masodfoku egyenlet. Nem vagyok 
kezdd, de a ..Soros karbantartas". 
6s ,,Nagyg6pes szimulaci6" r6szek- 
kel nem tudtam megbirkdzni. Mali- 
ciozusan osszevetve az ugyancsak 
ketszerzSs ,, Hetedhet"-tel. ugy 
tunik. tobb segits6g egy laikus. 
mint egy szakember?! 
A Kocsis-trilogia harmadik kotete 
kezikonyv leven. csak a m6sik ket- 
tdrdl (7) ess6k sz6. A nyelvezet 
ism6t a szamitastechnikai jogaszo- 
kat idezi. Rejt6ly, hogy Pdlya 
Gyorgy hazajaban hogyan lehet a 
..feladatmegoldasrol". a 3. fejezet 
stilusaban irni! Tragikusan keve- 
rednek a BASIC- 6s koz6pg6pes 
oper6ci6s rendszer funkcidk. Sdt 
f6lek. az ajanlas ellen6re (..Balint- 
nak 6s Gabornak"). a PC-k koraban 
a konyv hallgatdlagosan koz6p- 
6s nagyg6pek hasznaloinak irddott. 
Piranha rajkdnt hemzsegnek a 
..probl6m6k modulszerkezetei". 
Figyelemre melto az elsd 6t (..kedv- 
csin6ld") p6ldaprogram : 
ellenallas-sz6mitas - a 17 sorbdl 8 

REM, 6 LET ... 
beruhazas gazdasagossag - kb. 35 

sorbdl 12 REM, 14 PRINT 
amortizacidszamitas - AMOR neve 

miatt veletlenul megn6ztem. I. 

k6sdbb 
berelszamolas 

cimletosszet6tel meghatarozasa ki- 

f izetdhelyen. 
AMOR-bdl egy pajzan reszlet 115. 

oldal): 

220 IF K <5 THEN GO TO 240 
230 GO TO 270 
240 REM * THEN AG * 
250 N = (B*(5-K))/5 

260 GO TO 290 

270 REM * ELSE AG * 
280 N»1. 
290 REM * IF VEG * 
Reszlet kibogozasa 6s rdvidit6se 
hazi feladat kezddknek. A BASIC 
amugy sem tul strukturalt nyelv - 
neh6z jdl attekintheto Iist6ju prog- 
ramot frni -, de ez az6rt sz6nd6kos 
hitelrontas ! 

Ury Laszld elsd kotete (8) a szivar- 
vanyszinu sorozat sikeres darabja. 
egy el6g jd k6zikdnyv. Nem tan- 
konyv, igy a mddszern6l fontosabb 




a teljessege. Picit szerencs6tlennek 
tQnik az utasitasok nevsorban tor- 
tenb omlesztese, illetve nagyon 
hianyzik egy targymutatb. Igen 
szGkszavu a SIMON'S BASIC-rbl 
szblb resz. elbg bsszevissza, 6s 
pongyola. (Lehet, hogy egy rossz 
fordftas?) Tetszett viszont az uta- 
sitatok targyalasa: tenyek-peldak 
magyarazat. Vegeredmenyben 16- 
nyegesen jobbnak tartom, mint a 
gephez adott, gyari „USER MA- 
NUAL' -t. Lenyegeben hasonlb ko 
vetkeztetesre jut Turchanyi Geza 
az INFORMAClO elektronik 85/3. 
szamaban. 

Az UK dicseretes buzgalommal for- 
ditgatja az idegen nyelvO gepkdny- 
veket (9). Sem a szellemi bef ektetes. 
sem a primitiv nyomdatochnika nam 
indokolja a szerintem horribilis 
firat. Lehet, hogy a temerdek sajtb- 
hibat kell megf izetniink? 
A TV-BASIC cimO torzszulottre (10) 
vagyok a legmergesebb ! Szerzonek 
sikerult a tavolrbi sem tokeletes 
haromkbtetes mOvet (7) alulmulni. 
Raadasul ez a TANFOLYAM seged 
konyve!? Rendkivul zavar6 a negy 
gep HT, ZX. PRIMO. C64 - egyszerre 
torteno targyalasa. A nyelvezeterol 
lasd (6) 6s (7). Ez a stilus a Kdzds 
kiad6 hivatalos nyelve? De miert 
kinoznak vele egy orszagot? Meg 
mindig nem tudom pontosan, mi 
a ..modul". de a helyor szerzett 
nehany vidam percet. A 79. oldalon 
olvastam: ..A teszteles lenyege. 
hogy kuldnbbzO bemeneti adatok- 
kal prbbaljuk ki a programot (illetve 
a modulokat). es kozben figyeljuk, 
hogy a specifikacib szerint mQko- 
dik-e". Eddig sok olvas6nak illene 
eljutni. leven ez a 4. adas: A ..tobb 
programbdl all6 szerkezetek" su- 
Iyar6l vajon mit lehet tudni? 
Aki az els6 fejezetben a billentyO- 
zettel ismerkedik. par het mulva 
adatallomanyokat szervez a 13-14. 
fejezet szintjen. Megertem. hogy 
120 forintos kdnyvet ugy lehet a 
legtobb emberre rasbzni - a tv* 
adas propagandajaval - ha meg se 
prdbaltuk tisztazni. kinek sz6l. Az 
mar mas kerdes. kit erdekel, lesz- 
nek-e a vasarl6kbdl olvasdk? A nagy 
buzgalommal szervezett orszagos 
UGY ezen a ponton tobbet erde- 
melt volna. 

Eredetileg csak egyetlen kdnyvrdl 
akartam irni, kozben fogalmaz6dtak 
meg a tobbirdl mondottak. Most 
megint ugy erzem. tovabb lehet/ 
kell menni. Tobbszor hallhattunk, 
olvashattunk peldaul a BIT LET ben 
is - a szamit6gepeket ovezo kodds 
misztikar6l. Nem erdsiti-e a jelen 
irasbol kibontakozd kiadoi. sdt 
altalaban tomegkommunikacibs po- 
litika ezt a jelenseget? Jollehet ez 
egyaltalan nem kivanatos, de so- 




1. kin: 
ir - 4.5 

(On»naqaban tobbihe/ k^p«s») 

2. kin: 
P 0rt fSri4k - 5 

(fcgytftlen rossz konyvre s«m utalj) 

3. kin: 
k4porny6kmret4s - 5 

(Sok nekifuiava. didaktikc.jsan) 
4 kin: 
hang - 5 
f Nagyon helyesen kima«adf!) 

5. kin: 
programtiroISs - S. 5 

(I 3 fenntartas) 

6. kin: 
g4pi kdd - S 

( Lqv szdt se fbla ') 

7. kin: 

mmgblxhatdaig (sajtdhibtk) - 4 

(Nehany aprosag pi 123 140 3? 7 
old ) 

8. kin: 
billantytliat -4.5 

<L 2 fenntarras) 

9. kin: 
dokumentac/6 - 

10. kin: 
edit Alas - 4.5 
(L 1 fenntartas) 

11. kin: 
nyalva(zata) - 5 

(L TfcTSZETT) 

12. kin: 
tanulhatdsAg - 5 

(Prbbaid ki>> 

13. kin: 
ambarkdzalsSg - 4 

ft 6 fenniar'as^ 

1. kin: 
szubjaktiv - 5 

4t lag 4.5 



kaknak igen kellemes, sot jovedel 
mezd. 

Minek minGsitsuk, hogy az ..Iskola- 
szamftbgep program" evi sok-sok 
(talan szaz) millibjabol nem tellett 
meg egyetlen elfogar*'iat6 alkotas- 
ra. A Tankdnyvkiado sem tekinti 
ezt a feladatanak vagy hianyzik az 
,.MM rendelete"? Ugy erzem pedig 
lenne ra kapacitas, de a kiadbk a bo- 
logatb szerz6t szeretik, aki kurti- 
tasba. egyszerQsitesbe beleegyezik. 
tartja a hataridoket stb. Tobb 
kdnyv(tervezet)r6l tudok, ami vala- 
hol fekszik. L6cs Gyula - aki mar 
j6 tiz eve letette nevjegyet nehany 
nyelvkonyvvel - erdekes sorozata a 
,,Szamitastechnika" folybiratban 
nem erdemelne meg egy atdolgo- 
zast konyvve? Sajnos. mar 6tiras 
elkepzelhetS csak el - gondolva a 
kozben eltelt 4-5 evre. Dusza Ar- 
pad - a hazai szamitdgepes oktatas 
egyik „nesztora" - tankdnyv-kezira- 
tai miert fibkokban porosodnak? 
Vajon Kovacs Mihaly (Bp. Piarista 
Gimnazium) tapasztalatai es ered- 
menyei nem ernenek meg egy irast? 
Az ELTE ABC-80 fiizeteit nem lenne 
erdemes mas tipusra is atdolgoz- 
tatni es kiadni? A KFKI-ban is jelent 
mar meg par dolog. amit ismer (het- 
ne) nehany kiadb. Ezek a mOvek 
mind ismerbseim. es valbszinOleg 
sokszor ennyi az elfekvb keszlet. 
Sajnos a mindseg feltetele a valo- 
gatas 

Nem tiz. de talan szaz konyvet el 
lehetne siitni ebben. 6s hasonlb 
temakorbkben - mint ahogy a piac- 
fuggb nyugati kbnyvkiad6s tanu r6. 
Nalunk a szerzbn 6s olvasbn kivul 
senki nem 6rdekelt ebben. Sajnos 
6k nem tudnak konyvet csinalni. 
M6g Iegal6bb egy I6ncszem hi6ny- 
zik. 
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LEBEGOPONTOS ARITMETIKA 
A SPECTRUMON V. 

A mostani alkalomra mar csak egy n6hciny kod jelentes^nek 
tisztazasa maradt. Ezek kozul az elso negy olyan, hogy elso- 
sorban sajcit celokra hasznalja az interpreter. 

39H A szogfuggvenyek szamitasanal hasznalatos. Hi'vas- 
kor a stack tetejen szamot jeldljuk X-szel. visszat6r6skor 
ugyanott legyen V' X-bol kepezzuk a V szamot. hogy 

i. -1 *V*1 legyen es 
li. SIN(PI*V/2) = SIN X teljesulion. 

(Azaz a szogfuggvenyek sorbafejtesehez van szukseg erre 
a muveletre.) 

A transzformaci6 ket lepesben tort^nik: 

• Kepezzuk az alabbi kifejez£s 6rteket. 

V = 4*(X/(2«PI)HNT(X/(2*PI) + .5)) 

• V = Y. ha -1 *Y*1 

V = 2-Y. ha1<Y<2 

V = -2-Y. ha -2-Y--1 

Matematikai modszerekkel belathat6. hogy az X es az igy 
kapott V ert^kre teljesulnek a fent leirt felt6telek. 

3CH X*10 M alakban adott szam ert6k6t szamolja ki. 
X hfvaskor a stack tetejen M (poziti'v vagy negativ eg6sz) 
az akkumulatorban van. 

3DH Kis egesz" formaban abrazolt szamot az altalanos 
5 byte-os alakra konvertal. (Nem mondtuk ki ugyan 
hatarozottan. de a kis egeszeket [I. janu£ri BIT-LET] nem 
kotelezo mas m6don ^br^zolni, mint a tobbi szamot.) 
Ezt a rutint a logaritmus-. exponencialis stb. fuggvenyek 
hiv^sa eldtt hasznalja az interpreter. 

1 AH Egy byte-ot beolvas az adott csatornarbl. A csatorna 
szcimat a stack tetejen alio szcim adja meg. Errol bovebbet 
most nem irunk, ugyanis sok olyan ismeretet tetelez fel 
a haszn^lata. amely most nagyon messzire vezetne. 
L£that6. hogy ezekkel a muveletekkel I6nyegeben minden 
olyan tevekenys^g elvegezheto. ami BASIC-ben. Azonban 
sokakban felmerulhet. hogy mi6rt van erre mind szukseg. 
hiszen n6h6ny. j6l kiv^lasztott alap-rutin segftseg6vel 
a tobbiek 6sszeszervezhet6k Ienn6nek. Term£szetesen 
a Spectrum interpreter6nek ir6i 6ppugy tisztSban voltak 
ezzel, es tenyleg csak egynehany rutin van megirva. a tobbi 
ezek osszeszervez^sebol Ez ut6bbiak arr6l ismerhetok 
fel. hogy egy RST 28H utasftSssal ..belulrfil" ujra meghi'vjSk 
a lebeg6pontos kalkulatort. (Ez a rekurzi6 az egyik oka 
annak. hogy a sok szamitSst igenyl6 BASIC programok 
viszonylag lassan futnak a Spectrumon [I. 1984. januSri 
BIT-LET. Benchmark.]) 

Ez azonban egy kor^bbi megjegyz6sunk magyar^zat^ul is 
szolg^l: az ujabb RST 28H term^szetesen elronthatja a 
BREG tartalm£t. amely kizSrja ezen utasitSsoknak ilyen belsd 
ciklusban tort6n6 haszn^lat^t Most eppen ez6rt osszefog- 
laljuk azon rutinok k6djait. amelyek nem rontiak el a 
BREG-et: 



31 H. 33H-37H. 



00H-05H. 07H-0FH. 17H-1EH. 29H- 
3AH. A0H-A4H. C0H-C5H, E0H-E5H. 

Mielott befejezn6nk az ismertetSst. szblnunk kell meg egy 
k6dsorozatr6l: 82H-9FH. Ezek segi'tsegevel egy egesz 
polinom helyettesit^sierteketszamoltathatjuk ki. Hasznalata 
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I6nyeg6ben egyszeru: a kod utan lei'rjuk az egyutthat6kat 
(ugyanugy, mintha a 34H k6dot haszn£ln3nk [I. a sorozat 
harmadik reszdt. juniusi BIT- LET] . de a 34H -t termSszetesen 
nem irjuk le). A fuggetlen v3ltoz6t a stack tetejen adjuk at. 
Az egyutthat6k darabszamat a k6db6l ugy kaphatjuk meg. 
hogy a k6db6l kivonunk 80H-t. A bonyolultsSgot m6gis az 
okozza, hogy a felsorol^sban nem a t^nyleges polinom 
egyutthat6it kell megadni. Ez a rutin ugyanis a fuggetlen 
v^ltozb un. Csebisev-polinomjeival szamol. 

Ez az ut6bb emlitett m6dszer ismertet^se tulmenne a jelen 
sorozat keretein. de azok az olvasbk, akik kedvet 6reznek 
(6s alapk£pzetts6guk is megvan) hozza. m3r el tudnak 
indulni egy felfedezo uton kikis^rletezni. hogyan is megy ez 
pontosan. 

Tudjuk. hogy ez a sorozat nem lehet teljes, hiszen az eg6sz 
aritmetikarol nemhogy cikksorozatot, hanem eg6sz konyv- 
sorozatot (rhatna az. aki minden apr6 Iehet6s6get. 6rdekes- 
s6get fel akar tarni. Sorozatunkkal legink^bb azt akartuk be- 
mutatm. hogy a ROM-rutmok kozul gyakorlatilag mindent 
fel lehet hasznalni sajat celokra is. 6s peldaul nem kell fel- 
tetlenul egy gepi kodu programbbl csak azert visszat^rni 
BASIC- be. mert bizonyos szcimi'tasokat ott tunik k^nyelmes- 
nek elvegezni. Gepi kddban maradva term^szetesen lesz egy 
kis tobbletmunkank, de ne felejtsuk el. hogy ez is j3r olyan 
es annyi elonnyel. mint b^rmely m^s g6pi k6du program: 
sokkal gyorsabb. es kevesebb tSrkapacitast igdnyel. 

Rem^ljuk. hogy sorozatunkat sokan j6l fogj^k tudni hasz- 
nosi'tani kesobbi programjaikban. 

Halasz Peter 



r 




Tisztelt Szerkeszt6s6g ! 

Sok bosszusagot okozott mar programozaskor az aramkima- 
radas. T alaltam egy kapcsolast. amely hasznalataval nem v6sz 
el a program aramkimaradaskor, de sajnos konkret adatokat 
nem tarta/maz. K6rem. adjanak tanacsot. hogyan lehetne 
megepiteni ? 
Szabo Jozsef 

Balmazujvaros, Debrecen/ ut 3-5. 

A valaszadashoz regi ismerdseinket. az ELKON GM-et kertuk. 
segitsenek. Az alabbi valaszt az 6 leveliik alapjan irjuk. 
A kozolt kapcsolasi rajz valbban ved aramkimaradas esetere. 
de a Spectrum viszonylag nagy aramfelvetele (700-800 mA) 
meg rovid ideju tapellatasi igeny eseten is meglehetdsen 
nagy meretu es kapacitasu akkumulatort igenyel. Eppen ezert 
a szunetmentes taplalas csak ott indokolt, ahol a rendszer 
folyamatos mukodese elengedhetetlen (pi. folyamatiranyitas). 
A kulso tapforras 9-10 V kozotti legyen. azaz 8 db R14 (Baby) 
vagy R20 (Goliat) meretu Ni-Cd akkumulator szukseges kb. 
30 perces aramkimaradashoz. 

A ket dioda legalabb 1 A-es legyen, az R ellenallas a tolto- 
aramot hivatott korlatozni. 
Mindehhez szerkesztosegunk megjegyzese: 
Szerintunk a problema ilyen megoldasa csak elmeleti jelen- 
tosegu. mert a folyamatos programozashoz ugyis szukseg 
van meg egy mukodd tv re. Annak tapellatasat ezzel a mod- 
szerrel megoldani nem lehet, leven a tv-nek a Spectrumenal 
is lenyegesen nagyobb aramigenye (pi. a Junoszty tv 12 V-rol 
kb. 3-3,5 A). £ppen ezert, ha a tv-t autoakkurol uzemeltetjuk, 
akkor arrol megoldhato a Spectrum uzemeltetese is, csak 
arra kell ugyelni, hogy az autoakku feszultsege a Spectrum 
nak egy kicsit sok. 

A levelben szereplo egyeb kerdesekre levelben valaszoltunk. 



Tisztelt Szerkesztdstg? 

HT hasznalo vagyok. kerdeseim is ezzel kapcsolatosak. 

1 . Egy szamitogepen megirt dalt lehet-e kozvetlenul (csatla 
kozokabellel) felvenni mdsoros kazettara vagy mindenke'ppen 
mikrofon sziikse'geltetik ehhez? 

2. Hogyan lehet megakadalyozni egy READY utan kdvetkezd 
parancs vegreha/tddasat (pi. LIST 4s LLIST kizdrdsat)? 

3. Az egyik e/ozo BIT-LET-ben (85 m4j 30.) talalkoztam 
egy szamomra e'rthetetlen dologgal 

Idezem (32. o. 3. pont): 

ha egy kod egy ma's utan tobbszor fordulna eld, akkor 
peldaul eleirjuk minusz e/ojellel azt. hogy hAny darab kell 
belole, s utana egyszer leir/uk a kodot 

Hogyan lehetseges ez? A cikkben erre nines magyarazat. 
programfejtegeteseim pedig nem jartak sikerrel ez ugyben. 
De ha ez megis igy igaz. akkor mie'rt van az elso peldaprogram 
900 as soraban a 140-es es a 25-ds ert£k e/dtt — 1 ? Ez meg- 
kerddje/ezi az egesznek az ertelmet ! 

4. Programlistat (jatek) nyomtaton e/kdszitve elfogadnak-e 
4s fizetnek-e erte honordriumot ? Ha igen. Grtesitsenek ennek 
modjarolf 

Fuldp Ferenc 

Budapest. Prieszol J. u 2. 1203 

1. A HT-n van lehetoseg kozvetlenul, csatlakozokabellel fel- 
venni magnora a generalt zenet. A gep hatan levo csatlakozbk 
kiosztasat az uj kiadasu gepkonyv kozli. 

2. Mar megirtuk. hogy ilyen ..drasztikus" programvedelem- 
mel nem foglalkozunk. bar e mbdszert ismerjiik. (Hogy ezt 
milyen konnyu kijatszani leirjuk. hogy pi. PRINT :LIST-et 
mar vegrehajt meg emellett a vedelem mellett is.) 

3. Az emlitett cikkben nem deriil ki egyertelmuen, de a pel- 
dak, feladatok eldtti resz csak otleteket ad, az elso meg- 
valositasnal ennek egy mbdositott valtozatat hasznalta a 
szerzo, amelyet le is irt. (A masodik program teljes eg6sze 
ben az On altal is lei rt elv alapjan keszult.) 

4. Mar tobbszor megirtuk, hogy programokat k zettan ke- 
riink, hogy kipr6balhassuk. Termeszetesen, ha j6nak. otletes- 
nek talaljuk (peldaul ,,lbv6ldozd" jatek nem valbszinu. hogy 
ilyen). akkor kozoljuk. es a szokasos honorariumot fizetjuk 
erte. 



Tisztelt Olvasoink ! 

Nem ertjuk miert. de egyre tbbben kerik. hogy kizarolag 
levelben valaszoljunk problemaikra. Ugy erezzuk, hogy mi 
eppen azdrt vagyunk, hogy az olyan kerdesekre. amely valo- 
szinuleg sokakat erinthet, a lap hasabjain valaszoljunk. ^ppen 
ezert kerjiik, hogy minel kevesebben irjak oda a leveliik ve- 
gere, hogy levelben kernek valaszt! 

A masik problemankat mar egyszer szbvatettuk, de ugy lat- 
szik, nem lehet elegszer ismetelni? Bekuldott programokat 
csak abban az esetben tudunk kozolni. ha azt kazettan is 
megkapjuk, ugyanis arra nines kapacitasunk, hogy mi ,.be- 
potyogjuk" valamely szamitbgepbe. Ugyancsak sokan kirl- 
denek be hasznalati utasitas, programleiras nelkul programo- 
kat. Ezt is szova tettuk nehanyszor, hogy ezekkel nem tu- 
dunk mit kezdeni. 

Kerjiik Olvasoinkat. hogy ilyen hianyos formaju kozlendok- 
kel minel kevesebbel, tartalmas. teljes anyagokkal minel 
tobbel orvendeztessenek meg bennunket ! 



Mult havi BIT LET-unk Nyilt ter rovataban Laz^r Kdroly le- 
velet kozdltuk. Ebben tobbek kozott olvasbnk szbva tette, 
hogy nem jut megfelelS, a gepi k6du programozast tanitb 
irodalomhoz. Ismeri ugyan lapunk sorozatat, de mint irta, 
kifejezetten Spectrum g6phez szeretne anyagot. Lapunkat 
elolvasvan kedves levelet irt hozzank dr. Laczk6 B^la a Mik- 
roelektronika c. lap szerkesztSje. Folhivja olvasbink figyel- 
met a lapban megjelen6 e t^maval foglalkozo sorozatra, 
amelybffl eddig hat resz jelent meg, s tovabbi kettfi elOke- 
sziiletben van. Kbszonjiik az informacibt, s azt is, hogy fol- 
hivta figyelmiinket lapjuk legujabb szamanak nehany irasa- 
ra, igy a T6th Ferenc altal a HT 1080 Z programozasarbl irott 
cikkere, valamint Palfalvi Jen5nek a VHS rendszeru kepmag- 
n6kr6l sz6l6 irasara. 



Oszinte megbanassal tudatjuk, hogy mult havi szamunk 28 
29. oldalan a Prim6 zene-bona cimO programajanlatunk szer- 
z6 nelkul jelent meg. Tudatva, hogy nem a nyomda ordoge, 
hanem a feledekenyseg okabbl tortent a dolog - ehelyutt 
pbtlblag kozoljuk, hogy a szerzd 

Or/ey Gabon Orley Gabor; Orley Gabor; Orley Gabor 
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Tisztelt BIT-LE T 1 

3. osztd/yos szakkozepiskotas vagyok. Eddig az iskolaban 
foglalkoztam szamitastechnikaval, 6 s e/e'g jo I sikeru/t el- 
sajatitanom a BASIC-nyelvet. Nemre'g hozzajutottam egy 
ORIC-1 tipusu 16 K-s mikroszamitogephez. Nagy on dru/tem 
neki, azonban ez a gep hazankban nem tul ismert. 6s a hozza 
mellekelt angol 6s n6met nyelvu gepkonyvet sem sikeru/t 
leforditatnom. Igy csak a mintaprogramokat gGpelgettem 
be. majd miutan megismertem az ORIC egy-k6t sa/atos uta- 
5 it as at sajat programokat is kezdtem irni. 

Szeretn6m teljesen megtanulni a gep BAS/C-je't, es gepi kddu 
programozasat. ehhez azonban magyar nyelvu leiras kellene. 
Ebben ke'rne'm az On ok segitse'ge't: irjak meg. hogy hoi lehet- 
ne ilyet beszerezni. vagy ha lenne olyan olvaso. aki masolas 
ce'ljabol el tudna kuldeni egy magyar nyelvu gepkonyvet, 
vagy valamilyen mds uton 6t tudna adni tapasztalatait az 
ORIC-kal kapcsolatban. Programokat is szivesen cser6ln6k ! 
Ezenkivul szeretnem megtudni. hogy Magyarorszagon hoi 
lehetne ORIC-1 -hez vasaro/ni tartozdkokat (pi.: memoria- 
bovitot. botkormanyt stbj 6s softvert 
lhasz 1st vin 

8200 Veszpr6m. Haszkovo u. 18/ A 

Mi nem kuldunk Onnek semmit. de talan a markatarsak ! 



my .. . » ■ szeptember 24 An Jelenik meg. de addig is 

IVOVetKBZO SZamUflK . minden heten az Otletben szamitastechnika 
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1. Piarista Gimnazium, Bp. 98 pont . 2. Berzsenyi Daniel Gimn. 3. szakkor Bp. 97 pont • 3. Foldes Ferenc Gimn. 
A szakkor. Miskolc 92 pont • 4. vorosmarty Mihaly Gimn.. £rd 87 pont • 5. M6ricz Zsigmond Gimn.. Tiszak6cske 
86 pont • 6. 1 . sz. Ipari Szakmunk3skepz6 Int. Miskolc 85 pont 

DicsSret: JATE S^gv^ri Endre Gyak. Gimn. 2, 3 szakkor. Szeged • Katona Jozsef Gimn.. Kecskemet • Leovey K. Gimn.. 
Pecs • M6ricz Zsigmond Gimn . Szentendre • Roth Gyula Erdogazd. 6s Faip.-i Szakkdz. isk. r Sopron 
Az elso helyezett az i'g£rt MICOLOR 1 -et kapja. a 2. helyezett 1 6ves el6fizetest az Otletre, a tov^bbi kozolt helyezettek 
oklev6lben reszesulnek. 
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/ ^Eszakisark 




kerulet 
1 km 



H A N Y | V J_S ! 

A kapitAny?! 

-#< 



___J 



KArjuk levsgm As a levelre fel ragasztani I 
Bekuldesi hater id6 szeptember 15. 1 



A feladat kozismert megoldasa : az ember az Eszaki- 
sarkon allt. Azonban nem csak ez az egy megoldas 
van. Kepzeljuk el ugyanis az 1 km keruletu d6lkort 
(d£li sz^lessegi kor), s vegyuk ennek a tetszoleges 
pontjat. menjunk innen kepzeletben 6szakra 1 km-t. 
Induljon innen az emberunk! Ekkor del fele menve 
1 km-t, 6pp az emlitett delkorre jut, 1 km-t keletre 
menve visszajut ugyanide, s innen egy km-t 6szakra 
menve epp a kiindulasi helyere erkezik. Tehat az 
1 km keruletu d6lkortol 1 km-re eszakra fekvo del- 
kor minden pontja jo kiindulasi hely. De ugyanugy 
j6 a 1/2 km keruletu dglkortdl 1 km-re eszakra 
fekvd delkor minden pontja is, az 1/3 km keruletutol 
1 km-re Eszakra fekvd minden pontja is, 6s igy to- 
vabb. Lathatjuk, hogy nemcsak vegtelen sok kiindu- 
lasi pont van, hanem vegtelen sok delkor is van, 
melyeknek minden pontja jo kiindulasi por t. Hatar- 
helyzetk£nt jonak vehetjuk a D6li-sarkt6l 1 km-re 
fekvo d6lkor pontjait is, bar ha emberunk innen 
indul, az elso 1 km ut£n a D6li-sarkra erkezik, s itt 
igazabol nem tud keletre menni. 
Mcis megoldas viszont nines. Ugyanis az 1 km, 1/2 
km stb. keruletu eszaki sz£less6gi kor az Eszaki- 
sarkhoz 1 km-n6l kozelebb van, igy ezekre nem 
tudunk ugy eljutni, hogy valahonnan 1 km-t delre 
megyunk Ha pedig a keletre menes soran igazabol 
helyet valtoztatunk, akkor egy masik hosszusagi 
kor ment6n kell eszakra mennunk, mint amelyik 
ment6n d6lre mentiink, s a hosszusagi korok csak 
a sarkokon metszik egym^st (itt hosszusagi koron 
csak a sarktol sarkig terjedo f6lkoroket 6rtjuk, mint 
ahogyan igy is szamozzak oket). A Deli-sark pedig 
nem lehetett a kiindulasi pont. 
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Ez a feladatunk ket r^szbol ail: 

a) Van-e olyan derekszdgu haromszog, melynek ol- 
dalhosszusagai egesz szamok, s valamely k6t oldala 
negyzet£nek a kulonbsege 15? 

b) A ,,Mohacs" nevu magyar hajo a Foldkozi-ten- 
geren hajozik. A hajo szelessege 35 meter. A hajo 
hosszanak, a hajo sulyanak 6s a kapitany eletkora- 
nak a szorzata eppen az egesz szamok osszege 1-tol 
a hajora festett evszamig (ezt elaruljuk: 1526). 
Kerdes: hany eves a kapitany? 

Megjegyzes : ne felejtsek el kedves versenyzdink, 
hogy megoldasaikat meg is kell indokolni ! 



AMINT [QIRTOK 



augusztus 5-en delben ebed helyett kisorsoltuk az 
elozo Primo nyero palyazat legjobbjai kozt a g6pet. 
Meglepoen sokan - szam szerint nyolcan - jottek 
el az erintettek koziil, hogy jelen legyenek, s eset- 
leg udvrivalhassanak. Ez azonban ezuttal sem jott 
ossze. Az eddigi sorsolasokon meg nem fordult eld, 
hogy a nyertes ott lett volnal Sajnos! 
A nyertes: BERENYI ANDRAS Kaposvarrol. 
K6rjuk jelentkezzen telefonon szerkesztds6gunk- 
ben I 
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